From 4de8bd8f16645933fa995557b2cf4c5b9d64d520 Mon Sep 17 00:00:00 2001 From: Adam Vogt Date: Wed, 26 Dec 2012 02:37:25 +0100 Subject: Describe arguments for X.A.ShowText.flashText Ignore-this: 7f00a11196115ebf814c616aaf8e96f darcs-hash:20121226013725-1499c-9817853c36bf4bb9bffff8fd465cf6fded22b27e.gz --- XMonad/Actions/ShowText.hs | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) (limited to 'XMonad/Actions/ShowText.hs') diff --git a/XMonad/Actions/ShowText.hs b/XMonad/Actions/ShowText.hs index bc8bc00..3d9bff5 100644 --- a/XMonad/Actions/ShowText.hs +++ b/XMonad/Actions/ShowText.hs @@ -53,7 +53,7 @@ import qualified XMonad.Util.ExtensibleState as ES -- > ((modMask, xK_Right), flashText defaultSTConfig 1 "->" >> nextWS) -- --- ShowText contains the map with timers as keys and created windows as values +-- | ShowText contains the map with timers as keys and created windows as values newtype ShowText = ShowText (Map Atom Window) deriving (Read,Show,Typeable) @@ -87,7 +87,10 @@ handleTimerEvent (ClientMessageEvent _ _ _ dis _ mtyp d) = do handleTimerEvent _ = return () -- | Shows a window in the center of the screen with the given text -flashText :: ShowTextConfig -> Rational -> String -> X () +flashText :: ShowTextConfig + -> Rational -- ^ number of seconds + -> String -- ^ text to display + -> X () flashText c i s = do f <- initXMF (st_font c) d <- asks display -- cgit v1.2.3