dotfiles · commit

Update xmonad config

1255ab89e2398136bb6a00cc150670c729b4043c

Alexis Sellier committed 8 years ago 1 parent 75d4df3c

.xmonad/xmonad.hs +3 -2

            safeSpawnProg termName

barConfig :: Handle -> PP
barConfig h = xmobarPP
    { ppCurrent         = xmobarColor white   black  . wrap " " " "
    , ppHiddenNoWindows = xmobarColor grey    black  . wrap " " " "
    , ppHidden          = xmobarColor light   dark   . wrap " " " "
    , ppHiddenNoWindows = xmobarColor dred    black  . wrap " " " "
    , ppHidden          = xmobarColor grey    black  . wrap " " " "
    , ppUrgent          = xmobarColor black   red    . wrap " " " "
    , ppTitle           = xmobarColor red     black
    , ppLayout          = const ""
    , ppWsSep           = ""
    , ppSep             = "  "
    , ppOutput          = hPutStrLn h
    }
  where
    red   = "#AA0000"
    dred  = "#550000"
    white = "white"
    black = "black"
    light = "#888888"
    dark  = "#333333"
    grey  = "#555555"

52	52		safeSpawnProg termName
53	53
54	54		barConfig :: Handle -> PP
55	55		barConfig h = xmobarPP
56	56		{ ppCurrent = xmobarColor white black . wrap " " " "
57		-	, ppHiddenNoWindows = xmobarColor grey black . wrap " " " "
58		-	, ppHidden = xmobarColor light dark . wrap " " " "
	57	+	, ppHiddenNoWindows = xmobarColor dred black . wrap " " " "
	58	+	, ppHidden = xmobarColor grey black . wrap " " " "
59	59		, ppUrgent = xmobarColor black red . wrap " " " "
60	60		, ppTitle = xmobarColor red black
61	61		, ppLayout = const ""
62	62		, ppWsSep = ""
63	63		, ppSep = " "
64	64		, ppOutput = hPutStrLn h
65	65		}
66	66		where
67	67		red = "#AA0000"
	68	+	dred = "#550000"
68	69		white = "white"
69	70		black = "black"
70	71		light = "#888888"
71	72		dark = "#333333"
72	73		grey = "#555555"