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 | 29ae615a05df946ab1f58e3a258c2840e1e937ab (patch) | |
| tree | e90388c51a2d9c6940a7dfb395369610c3e8109a /XMonad.hs | |
| parent | 91c0e87c3db74dcd8fd57330d7026bab58e4cf64 (diff) | |
| download | metatile-29ae615a05df946ab1f58e3a258c2840e1e937ab.tar metatile-29ae615a05df946ab1f58e3a258c2840e1e937ab.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
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 () |