Bug in perWindowKeyRepeat

Hello,
in DeviceControl.hs of the GLUT library,
the marshalling of PerWindowKeyRepeat is doing the opposite of what it
should do, the functions should read:

marshalPerWindowKeyRepeat :: PerWindowKeyRepeat -> CInt
marshalPerWindowKeyRepeat PerWindowKeyRepeatOff = 1
marshalPerWindowKeyRepeat PerWindowKeyRepeatOn  = 0

unmarshalPerWindowKeyRepeat :: CInt -> PerWindowKeyRepeat
unmarshalPerWindowKeyRepeat _ = PerWindowKeyRepeatOff
unmarshalPerWindowKeyRepeat 0 = PerWindowKeyRepeatOn

this is because the actual function being called with this parameter is
glutIgnoreKeyRepeat, which disables key repeating if given a non zero
value.

	Yann