summaryrefslogtreecommitdiffstats
path: root/WMonad.hs
diff options
context:
space:
mode:
Diffstat (limited to 'WMonad.hs')
-rw-r--r--WMonad.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/WMonad.hs b/WMonad.hs
index 322f1f7..0b48cac 100644
--- a/WMonad.hs
+++ b/WMonad.hs
@@ -68,4 +68,4 @@ whenJust mg f = maybe (return ()) f mg
-- | A 'trace' for the W monad. Logs a string to stderr. The result may
-- be found in your .xsession-errors file
trace :: String -> W ()
-trace msg = io $ do hPutStrLn stderr msg; hFlush stderr
+trace msg = io $! do hPutStrLn stderr msg; hFlush stderr