summaryrefslogtreecommitdiffhomepage
path: root/src/Xmobar/X11/Bitmap.hs
diff options
context:
space:
mode:
authorTomas Janousek <tomi@nomi.cz>2021-04-26 12:39:50 +0100
committerTomas Janousek <tomi@nomi.cz>2021-04-26 14:17:45 +0100
commit18f4042472656d4a80b6da5d4a6f0635f4cdd8ae (patch)
tree04cf3c4e422ee45d22415fde945dd73bb15b9970 /src/Xmobar/X11/Bitmap.hs
parentdd8584af1ac7c2853c4db0ee2d1bfe1f71e62fde (diff)
downloadxmobar-18f4042472656d4a80b6da5d4a6f0635f4cdd8ae.tar.gz
xmobar-18f4042472656d4a80b6da5d4a6f0635f4cdd8ae.tar.bz2
Workaround for hlint failure
hlint started failing recently: src/Xmobar/X11/Text.hs:121:32: Error: Parse error: on input `-' Found: textExtents (Utf8 fs) s = do let (_,rl) = wcTextExtents fs s > ascent = fromIntegral $ - (rect_y rl) descent = fromIntegral $ rect_height rl + fromIntegral (rect_y rl) return (ascent, descent) It's probably a change in the parser or something, didn't really look into it, just changed it to something that's parsable.
Diffstat (limited to 'src/Xmobar/X11/Bitmap.hs')
0 files changed, 0 insertions, 0 deletions