From 0c7f388bcb7ebaabc16d7bd176b7a7b249ad5db5 Mon Sep 17 00:00:00 2001 From: Devin Mullins Date: Thu, 15 May 2008 07:17:28 +0200 Subject: fix compile warnings in BoringWindows darcs-hash:20080515051728-78224-9a945f90c2035888bcd7b1e245940e7ac28029d2.gz --- XMonad/Layout/BoringWindows.hs | 1 + 1 file changed, 1 insertion(+) diff --git a/XMonad/Layout/BoringWindows.hs b/XMonad/Layout/BoringWindows.hs index d66aa73..2629077 100644 --- a/XMonad/Layout/BoringWindows.hs +++ b/XMonad/Layout/BoringWindows.hs @@ -31,6 +31,7 @@ data BoringMessage = FocusUp | FocusDown | IsBoring Window | ClearBoring deriving ( Read, Show, Typeable ) instance Message BoringMessage +markBoring, clearBoring, focusUp, focusDown :: X () markBoring = withFocused (sendMessage . IsBoring) clearBoring = sendMessage ClearBoring focusUp = sendMessage FocusUp -- cgit v1.2.3