mirror of
https://github.com/xmonad/xmonad-contrib.git
synced 2025-08-08 16:01:53 -07:00
fix compile warnings in BoringWindows
This commit is contained in:
@@ -31,6 +31,7 @@ data BoringMessage = FocusUp | FocusDown | IsBoring Window | ClearBoring
|
|||||||
deriving ( Read, Show, Typeable )
|
deriving ( Read, Show, Typeable )
|
||||||
instance Message BoringMessage
|
instance Message BoringMessage
|
||||||
|
|
||||||
|
markBoring, clearBoring, focusUp, focusDown :: X ()
|
||||||
markBoring = withFocused (sendMessage . IsBoring)
|
markBoring = withFocused (sendMessage . IsBoring)
|
||||||
clearBoring = sendMessage ClearBoring
|
clearBoring = sendMessage ClearBoring
|
||||||
focusUp = sendMessage FocusUp
|
focusUp = sendMessage FocusUp
|
||||||
|
Reference in New Issue
Block a user