diff --git a/modules/wm/xmonad/config.hs b/modules/wm/xmonad/config.hs
index 42fd91d..9f77278 100644
--- a/modules/wm/xmonad/config.hs
+++ b/modules/wm/xmonad/config.hs
@@ -54,38 +54,3 @@ myConfig = ewmhFullscreen $ ewmh $ Docks.docks $ def
 --     [ className =? "Gimp" --> 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" ""