New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Add RRScreenChangeNotifyMask #8

Merged
merged 4 commits into from Mar 16, 2012
Jump to file or symbol
Failed to load files and symbols.
+3 −1
Diff settings

Always

Just for now

Next

Add RRScreenChangeNotifyMask

  • Loading branch information...
mathstuf committed Mar 11, 2012
commit 8caa9e7add72dd8d6d4ddf2d21382ba8ace53969
View
@@ -425,6 +425,7 @@ module Graphics.X11.Types
propertyChangeMask,
colormapChangeMask,
ownerGrabButtonMask,
rrScreenChangeNotifyMask,
-- ** Event types
EventType,
@@ -1267,6 +1268,7 @@ type EventMask = Mask
, propertyChangeMask = PropertyChangeMask
, colormapChangeMask = ColormapChangeMask
, ownerGrabButtonMask = OwnerGrabButtonMask
, rrScreenChangeNotifyMask = RRScreenChangeNotifyMask
}
type EventType = Word32
@@ -644,7 +644,7 @@ getEvent p = do
width <- #{peek XRRScreenChangeNotifyEvent, width } p
height <- #{peek XRRScreenChangeNotifyEvent, height } p
mwidth <- #{peek XRRScreenChangeNotifyEvent, mwidth } p
mheight <- #{peek XRRScreenChangeNotifyEvent, mheight } p
mheight <- #{peek XRRScreenChangeNotifyEvent, mheight } p
return $ RRScreenChangeNotifyEvent
{ ev_event_type = type_
, ev_serial = serial
ProTip! Use n and p to navigate between commits in a pull request.