diff options
| author | Jason Creighton <jcreigh@gmail.com> | 2007-04-19 05:22:44 +0200 |
|---|---|---|
| committer | Jason Creighton <jcreigh@gmail.com> | 2007-04-19 05:22:44 +0200 |
| commit | 169cc9b32475c25bc5a7e9342aa3098ee776c0ad (patch) | |
| tree | 6fab5c5ad2be4ab765b76ff1743a72bf15c20b2f /Operations.hs | |
| parent | b426f0bd077e337f67fc4a1204ad3b8d03332527 (diff) | |
| download | metatile-169cc9b32475c25bc5a7e9342aa3098ee776c0ad.tar metatile-169cc9b32475c25bc5a7e9342aa3098ee776c0ad.zip | |
use prefixed record names in latest X11-extras
darcs-hash:20070419032244-b9aa7-b3a4ef75d313d5c960775a75ddc91dbdae6485c7
Diffstat (limited to 'Operations.hs')
| -rw-r--r-- | Operations.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Operations.hs b/Operations.hs index 9c85872..17280a2 100644 --- a/Operations.hs +++ b/Operations.hs @@ -146,7 +146,7 @@ setButtonGrab False w = withDisplay $ \d -> io $ -- rectangle, including its border. moveWindowInside :: Display -> Window -> Rectangle -> IO () moveWindowInside d w r = do - bw <- (fromIntegral . waBorderWidth) `liftM` getWindowAttributes d w + bw <- (fromIntegral . wa_border_width) `liftM` getWindowAttributes d w moveResizeWindow d w (rect_x r) (rect_y r) (rect_width r - bw*2) (rect_height r - bw*2) |