10 lines
236 B
Haskell
10 lines
236 B
Haskell
|
module Xmobar.Common where
|
||
|
|
|
||
|
|
import XMonad.Hooks.DynamicLog (xmobarColor)
|
||
|
|
|
||
|
|
wrapColor :: String -> String -> String
|
||
|
|
wrapColor fg = wrapColorBg fg ""
|
||
|
|
|
||
|
|
wrapColorBg :: String -> String -> String -> String
|
||
|
|
wrapColorBg = xmobarColor
|