From 9d3e6d8a8f5fbb745758f621bf6331272261c79b Mon Sep 17 00:00:00 2001 From: Alec Berryman Date: Thu, 29 Mar 2007 04:43:30 +0200 Subject: Type error: button1 :: Button, not :: ButtonMask darcs-hash:20070329024330-39448-e216b34ecbe8822e90a4bf1a65ebea22a7261c49.gz --- Operations.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Operations.hs b/Operations.hs index f30460a..b80d16f 100644 --- a/Operations.hs +++ b/Operations.hs @@ -98,7 +98,7 @@ hide w = withDisplay $ \d -> do -- Window operations -- | setButtonGrab. Tell whether or not to intercept clicks on a given window -buttonsToGrab :: [ButtonMask] +buttonsToGrab :: [Button] buttonsToGrab = [button1, button2, button3] setButtonGrab :: Bool -> Window -> X () -- cgit v1.2.3