summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--XMonad/Core.hs1
1 files changed, 1 insertions, 0 deletions
diff --git a/XMonad/Core.hs b/XMonad/Core.hs
index cc39b94..d2195d6 100644
--- a/XMonad/Core.hs
+++ b/XMonad/Core.hs
@@ -332,6 +332,7 @@ runOnWorkspaces job =do
restart :: Maybe String -> Bool -> X ()
restart mprog resume = do
broadcastMessage ReleaseResources
+ io . flush =<< asks display
prog <- maybe (io getProgName) return mprog
args <- if resume then gets (("--resume":) . return . showWs . windowset) else return []
catchIO (executeFile prog True args Nothing)