diff options
| -rw-r--r-- | XMonad/Operations.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/XMonad/Operations.hs b/XMonad/Operations.hs index 9f48d9e..1e6e322 100644 --- a/XMonad/Operations.hs +++ b/XMonad/Operations.hs @@ -107,7 +107,7 @@ windows f = do ws = f old XConf { display = d , normalBorder = nbc, focusedBorder = fbc } <- ask - mapM_ setInitialProperties (W.allWindows ws \\ W.allWindows old) + mapM_ setInitialProperties newwindows whenJust (W.peek old) $ \otherw -> io $ setWindowBorder d otherw nbc modify (\s -> s { windowset = ws }) |