summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--XMonad.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/XMonad.hs b/XMonad.hs
index 2f1577c..b6450ee 100644
--- a/XMonad.hs
+++ b/XMonad.hs
@@ -150,7 +150,7 @@ restart mprog resume = do
prog <- maybe (io $ getProgName) return mprog
args <- if resume then gets (("--resume":) . return . show . windowset) else return []
io $ catch (executeFile prog True args Nothing)
- (const $ return ()) -- ignore executable not found exception
+ ( (hPutStrLn stderr). show ) -- print executable not found exception
-- | Run a side effecting action with the current workspace. Like 'when' but
whenJust :: Maybe a -> (a -> X ()) -> X ()