From 534977239535ba58f4e9f2b3482e3a42410423ed Mon Sep 17 00:00:00 2001 From: Spencer Janssen Date: Tue, 6 May 2008 22:38:40 +0200 Subject: Wibble darcs-hash:20080506203840-a5988-9f9543b4e741c9352282b04572e37c3588a81f7b.gz --- XMonad/Operations.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'XMonad') 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 }) -- cgit v1.2.3