Mer libs to xmonad

xmonad/.xmonad/lib/LemonBar.hs

@@ -0,0 +1,20 @@
+-- Micro lemonbar lib
+module LemonBar
+( tag
+, block
+, underline
+, overline
+, fColor
+, bColor
+, uColor
+, color
+) where
+
+tag       t v     = foldl (++) "" ["%{",t,v,"}"]
+block     t o c s = (tag t o) ++ s ++ (tag t c)
+underline         = block "" "+u" "-u"
+overline          = block "" "+o" "-o"
+fColor    f       = block "F" f "-"
+bColor    b       = block "B" b "-"
+uColor    u       = block "U" u "-"
+color     f b     = fColor f . bColor b . uColor f

xmonad/.xmonad/lib/Solarized.hs

@@ -0,0 +1,36 @@
+module Solarized
+( base03
+, base02
+, base01
+, base00
+, base0
+, base1
+, base2
+, base3
+, yellow
+, orange
+, red
+, magenta
+, violet
+, blue
+, cyan
+, green
+) where
+
+base03  = "#002b36"
+base02  = "#073642"
+base01  = "#586e75"
+base00  = "#657b83"
+base0   = "#839496"
+base1   = "#93a1a1"
+base2   = "#eee8d5"
+base3   = "#fdf6e3"
+yellow  = "#b58900"
+orange  = "#cb4b16"
+red     = "#dc322f"
+magenta = "#d33682"
+violet  = "#6c71c4"
+blue    = "#268bd2"
+cyan    = "#3aa198"
+green   = "#859900"
+