From feedc558ca871d436e20f74a692a0e42c1d689fb Mon Sep 17 00:00:00 2001 From: Spencer Janssen Date: Tue, 22 May 2007 01:24:27 +0200 Subject: List --resume args first darcs-hash:20070521232427-a5988-f7c747a1bfcc2a6ad38d5c47c3ecf195d1e4a6b5 --- XMonad.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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 -- cgit v1.2.3