summaryrefslogtreecommitdiffhomepage
path: root/src/Xmobar/X11/XlibDraw.hs
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2022-09-12 04:38:47 +0100
committerjao <jao@gnu.org>2022-09-12 04:38:47 +0100
commit0c13ab7001fea76c8ef06b681b8463471399754b (patch)
treec39ca060344ab129d772526bba2827b04a0a929f /src/Xmobar/X11/XlibDraw.hs
parent15c373076dec81c3245e42250512dea6a75db5e9 (diff)
downloadxmobar-0c13ab7001fea76c8ef06b681b8463471399754b.tar.gz
xmobar-0c13ab7001fea76c8ef06b681b8463471399754b.tar.bz2
X11.MinXft not needed anymore
Diffstat (limited to 'src/Xmobar/X11/XlibDraw.hs')
-rw-r--r--src/Xmobar/X11/XlibDraw.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/Xmobar/X11/XlibDraw.hs b/src/Xmobar/X11/XlibDraw.hs
index 5aec1eb..9a005e8 100644
--- a/src/Xmobar/X11/XlibDraw.hs
+++ b/src/Xmobar/X11/XlibDraw.hs
@@ -48,7 +48,7 @@ drawInPixmap gc p wid ht ~[left,center,right] = do
r <- ask
let c = config r
d = display r
- fs = fontListS r
+ fs = fontList r
vs = verticalOffsets r
strLn = liftIO . mapM getWidth
iconW i = maybe 0 B.width (lookup i $ iconCache r)
@@ -246,7 +246,7 @@ updateActions :: Rectangle -> [[Segment]] -> X [([Action], Position, Position)]
updateActions (Rectangle _ _ wid _) ~[left,center,right] = do
conf <- ask
let d = display conf
- fs = fontListS conf
+ fs = fontList conf
strLn :: [Segment] -> IO [(Maybe [Action], Position, Position)]
strLn = liftIO . mapM getCoords
iconW i = maybe 0 B.width (lookup i $ iconCache conf)