xmonad: Remove commented code
This commit is contained in:
parent
7da89d2409
commit
6f0ed7ad88
1 changed files with 0 additions and 35 deletions
|
|
@ -54,38 +54,3 @@ myConfig = ewmhFullscreen $ ewmh $ Docks.docks $ def
|
||||||
-- [ className =? "Gimp" --> doFloat
|
-- [ className =? "Gimp" --> doFloat
|
||||||
-- , isDialog --> doFloat
|
-- , isDialog --> doFloat
|
||||||
-- ]
|
-- ]
|
||||||
|
|
||||||
-- main = xmonad
|
|
||||||
-- . ewmhFullscreen
|
|
||||||
-- . ewmh
|
|
||||||
-- . withEasySB (statusBarProp "xmobar" (pure myXmobarPP)) defToggleStrutsKey
|
|
||||||
-- $ myConfig
|
|
||||||
|
|
||||||
|
|
||||||
-- myXmobarPP :: PP
|
|
||||||
-- myXmobarPP = def
|
|
||||||
-- { ppSep = magenta " • "
|
|
||||||
-- , ppTitleSanitize = xmobarStrip
|
|
||||||
-- , ppCurrent = wrap " " "" . xmobarBorder "Top" "#8be9fd" 2
|
|
||||||
-- , ppHidden = white . wrap " " ""
|
|
||||||
-- , ppHiddenNoWindows = lowWhite . wrap " " ""
|
|
||||||
-- , ppUrgent = red . wrap (yellow "!") (yellow "!")
|
|
||||||
-- , ppOrder = \[ws, l, _, wins] -> [ws, l, wins]
|
|
||||||
-- , ppExtras = [logTitles formatFocused formatUnfocused]
|
|
||||||
-- }
|
|
||||||
-- where
|
|
||||||
-- formatFocused = wrap (white "[") (white "]") . magenta . ppWindow
|
|
||||||
-- formatUnfocused = wrap (lowWhite "[") (lowWhite "]") . blue . ppWindow
|
|
||||||
|
|
||||||
-- -- | Windows should have *some* title, which should not not exceed a
|
|
||||||
-- -- sane length.
|
|
||||||
-- ppWindow :: String -> String
|
|
||||||
-- ppWindow = xmobarRaw . (\w -> if null w then "untitled" else w) . shorten 30
|
|
||||||
|
|
||||||
-- blue, lowWhite, magenta, red, white, yellow :: String -> String
|
|
||||||
-- magenta = xmobarColor "#ff79c6" ""
|
|
||||||
-- blue = xmobarColor "#bd93f9" ""
|
|
||||||
-- white = xmobarColor "#f8f8f2" ""
|
|
||||||
-- yellow = xmobarColor "#f1fa8c" ""
|
|
||||||
-- red = xmobarColor "#ff5555" ""
|
|
||||||
-- lowWhite = xmobarColor "#bbbbbb" ""
|
|
||||||
|
|
|
||||||
Loading…
Add table
Add a link
Reference in a new issue