summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorSpencer Janssen <sjanssen@cse.unl.edu>2007-05-22 01:24:27 +0200
committerSpencer Janssen <sjanssen@cse.unl.edu>2007-05-22 01:24:27 +0200
commitfeedc558ca871d436e20f74a692a0e42c1d689fb (patch)
tree4008e38c90d8eaa10df4b30f746c3c44486f8c05
parenta6b2573236d8563be844e503bf8e5417850e850b (diff)
downloadmetatile-feedc558ca871d436e20f74a692a0e42c1d689fb.tar
metatile-feedc558ca871d436e20f74a692a0e42c1d689fb.zip
List --resume args first
darcs-hash:20070521232427-a5988-f7c747a1bfcc2a6ad38d5c47c3ecf195d1e4a6b5
-rw-r--r--XMonad.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/XMonad.hs b/XMonad.hs
index dccdd12..d2f16a7 100644
--- a/XMonad.hs
+++ b/XMonad.hs
@@ -153,7 +153,7 @@ 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)
+ io $ catch (executeFile prog True (args' ++ args) Nothing)
(const $ return ()) -- ignore executable not found exception
-- | Run a side effecting action with the current workspace. Like 'when' but