summaryrefslogtreecommitdiffhomepage
path: root/src/Xmobar/Draw/Types.hs
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2022-12-23 23:20:55 +0000
committerjao <jao@gnu.org>2022-12-23 23:20:55 +0000
commitd896b1a80f3bc5dc487971b1230cd2b4185b9404 (patch)
tree59207cc6e85ecc674318b556b547c4e55dcfb4e3 /src/Xmobar/Draw/Types.hs
parent3f7a00defc69f9739c21390f6ba05990ff936b2b (diff)
downloadxmobar-d896b1a80f3bc5dc487971b1230cd2b4185b9404.tar.gz
xmobar-d896b1a80f3bc5dc487971b1230cd2b4185b9404.tar.bz2
Fix for #663: honour explicit bg/fg colors for icons
Diffstat (limited to 'src/Xmobar/Draw/Types.hs')
-rw-r--r--src/Xmobar/Draw/Types.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Xmobar/Draw/Types.hs b/src/Xmobar/Draw/Types.hs
index 9853c38..1a076b3 100644
--- a/src/Xmobar/Draw/Types.hs
+++ b/src/Xmobar/Draw/Types.hs
@@ -25,7 +25,7 @@ type ActionPos = ([Action], Position, Position)
type Actions = [ActionPos]
type IconLookup = String -> (Double, Double)
-type IconDrawer = Double -> Double -> String -> IO ()
+type IconDrawer = Double -> Double -> String -> String -> String -> IO ()
data DrawContext = DC { dcIconDrawer :: IconDrawer
, dcIconLookup :: IconLookup