diff options
-rw-r--r-- | XMonad.hs | 3 |
1 files changed, 1 insertions, 2 deletions
@@ -163,8 +163,7 @@ restart :: Maybe String -> Bool -> X () 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) - (hPutStrLn stderr . show) -- print executable not found exception + catchIO (executeFile prog True args Nothing) -- | Run a side effecting action with the current workspace. Like 'when' but whenJust :: Maybe a -> (a -> X ()) -> X () |