From 42263db712eb9b672ce92ab92e4128bb89f2d331 Mon Sep 17 00:00:00 2001 From: Don Stewart Date: Wed, 26 Mar 2008 03:33:03 +0100 Subject: my current config darcs-hash:20080326023303-cba2c-ab91d17da981d7ccd6b8de61453b9533f28b1764.gz --- XMonad/Config/Dons.hs | 16 ++++++++++------ 1 file changed, 10 insertions(+), 6 deletions(-) (limited to 'XMonad/Config') diff --git a/XMonad/Config/Dons.hs b/XMonad/Config/Dons.hs index b8d62a1..065df3d 100644 --- a/XMonad/Config/Dons.hs +++ b/XMonad/Config/Dons.hs @@ -14,11 +14,15 @@ module XMonad.Config.Dons where import XMonad import XMonad.Hooks.DynamicLog +import XMonad.Layout.NoBorders donsMain :: IO () -donsMain = dzen $ \conf -> xmonad $ conf - { borderWidth = 2 - , terminal = "term" - , normalBorderColor = "#cccccc" - , focusedBorderColor = "#cd8b00" } - +donsMain = dzen $ \x -> xmonad $ x + { terminal = "term" + , normalBorderColor = "#333333" + , focusedBorderColor = "red" + , layoutHook = smartBorders (layoutHook x) + , manageHook = + manageHook x <+> + (className =? "Toplevel" --> doFloat) + } -- cgit v1.2.3