diff options
| -rw-r--r-- | XMonad.hs | 7 |
1 files changed, 3 insertions, 4 deletions
@@ -150,10 +150,9 @@ spawn x = io $ do -- current window state. restart :: Maybe String -> Bool -> X () restart mprog resume = do - prog <- maybe (io $ getProgName) return mprog - args <- io $ getArgs - args' <- if resume then gets (("--resume":) . return . show . windowset) else return [] - io $ catch (executeFile prog True (args' ++ args) Nothing) + 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 -- | Run a side effecting action with the current workspace. Like 'when' but |