diff options
author | nickburlett <nickburlett@mac.com> | 2007-05-30 19:10:24 +0200 |
---|---|---|
committer | nickburlett <nickburlett@mac.com> | 2007-05-30 19:10:24 +0200 |
commit | 7ce5862b5554d046fb9142dfa353e23c60b762e7 (patch) | |
tree | e90388c51a2d9c6940a7dfb395369610c3e8109a /XMonad.hs | |
parent | c48b0477aa885274881477b74904a735356298df (diff) | |
download | xmonad-7ce5862b5554d046fb9142dfa353e23c60b762e7.tar.gz xmonad-7ce5862b5554d046fb9142dfa353e23c60b762e7.tar.xz xmonad-7ce5862b5554d046fb9142dfa353e23c60b762e7.zip |
log errors on executeFile in restart
I found it difficult to track down a problem in the restart code where xmonad was silently not restarting. This will log the error to stderr, which should show up in .xsession-errors
darcs-hash:20070530171024-01341-e8d0657705a1236dec13d1a6932d0c45b6523322.gz
Diffstat (limited to 'XMonad.hs')
-rw-r--r-- | XMonad.hs | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -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 () |