1 files changed, 1 insertions, 0 deletions
diff --git a/Main.hs b/Main.hs
index bfa6247..0524fc7 100644
--- a/Main.hs
+++ b/Main.hs
@@ -127,6 +127,7 @@ safeFocus w = do ws <- gets workspace
                     then setFocus w
                     else do b <- isRoot w
                             when b setTopFocus
+                 refocus
 
 handle :: Event -> X ()