Fix broken Haddock documentation for SDL.Event

polarina · polarina · commit 580296b01f80 · 2017-02-05T22:38:22.000Z
diff --git a/src/SDL/Event.hs b/src/SDL/Event.hs
@@ -413,7 +413,7 @@ data AudioDeviceEventData =
   AudioDeviceEventData {audioDeviceEventWhich :: !Word32
                         -- ^ The audio device  ID that reported the event.
                        ,audioDeviceEventIsCapture :: !Bool
-                        -- * If the audio device is a capture device.
+                        -- ^ If the audio device is a capture device.
                        }
   deriving (Eq,Ord,Generic,Show,Typeable)
 

Original file line number	Diff line number	Diff line change
`@@ -413,7 +413,7 @@ data AudioDeviceEventData =`
`413`	`413`	`AudioDeviceEventData {audioDeviceEventWhich :: !Word32`
`414`	`414`	`-- ^ The audio device ID that reported the event.`
`415`	`415`	`,audioDeviceEventIsCapture :: !Bool`
`416`		`- -- * If the audio device is a capture device.`
	`416`	`+ -- ^ If the audio device is a capture device.`
`417`	`417`	`}`
`418`	`418`	`deriving (Eq,Ord,Generic,Show,Typeable)`
`419`	`419`