WindowGo.hs: fix syntax in example

This commit is contained in:
Brent Yorgey 2008-02-09 22:51:35 +00:00
parent 37748e0b26
commit 8f71c70d37

View File

@ -72,7 +72,7 @@ raise = raiseMaybe $ return ()
there isn't you run a terminal with a command to run mutt! Here's an example, there isn't you run a terminal with a command to run mutt! Here's an example,
borrowing 'runInTerm' from XMonad.Utils.Run: borrowing 'runInTerm' from XMonad.Utils.Run:
> , ((modm, xK_m ), raiseMaybe (runInTerm -title "mutt" "mutt") (title =? "mutt")) > , ((modm, xK_m ), raiseMaybe (runInTerm "-title mutt" "mutt") (title =? "mutt"))
-} -}
raiseMaybe :: X () -> Query Bool -> X () raiseMaybe :: X () -> Query Bool -> X ()
raiseMaybe f thatUserQuery = withWindowSet $ \s -> do raiseMaybe f thatUserQuery = withWindowSet $ \s -> do