From 9aafcdd4869d62f6517cf9a27c92b88b09ec0f73 Mon Sep 17 00:00:00 2001 From: gwern0 Date: Sun, 14 Mar 2010 22:00:38 +0100 Subject: MessageControl: rm trailing whitespace Ignore-this: d4dc93a8a68847123918db416080e018 darcs-hash:20100314210038-f7719-d1e147057774018ef0e955c1df0134836b440382.gz --- XMonad/Layout/MessageControl.hs | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'XMonad/Layout/MessageControl.hs') diff --git a/XMonad/Layout/MessageControl.hs b/XMonad/Layout/MessageControl.hs index 51999a1..fb0962a 100644 --- a/XMonad/Layout/MessageControl.hs +++ b/XMonad/Layout/MessageControl.hs @@ -41,7 +41,7 @@ import Control.Arrow (second) -- > import XMonad.Layout.MessageEscape -- -- Then, if you use a modified layout where the modifier would intercept --- a message, but you'd want to be able to send it to the inner layout +-- a message, but you'd want to be able to send it to the inner layout -- only, add the 'unEscape' modifier to the inner layout like so: -- -- > import XMonad.Layout.Master (mastered) @@ -60,7 +60,7 @@ import Control.Arrow (second) -- layout, use the 'ignore' modifier: -- -- > myLayout = Tall ||| (ignore NextLayout $ ignore (JumpToLayout "") $ --- > unEscape $ mastered 0.01 0.5 +-- > unEscape $ mastered 0.01 0.5 -- > $ Full ||| simpleTabbed) -- -- /IMPORTANT NOTE:/ The standard '(|||)' operator from "XMonad.Layout" @@ -121,6 +121,6 @@ unEscape l = ModifiedLayout UE l -- | Applies the Ignore layout modifier to a layout, blocking -- all messages of the same type as the one passed as its first argument. -ignore :: (Message m, LayoutClass l w) +ignore :: (Message m, LayoutClass l w) => m -> l w -> (Ignore m l w) ignore _ l = I l \ No newline at end of file -- cgit v1.2.3