summaryrefslogtreecommitdiffhomepage
path: root/src/Xmobar
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2022-09-16 00:27:37 +0100
committerjao <jao@gnu.org>2022-09-16 00:27:37 +0100
commitea075213baa7e6fe6ed519a6b5c70e7ae89a56a1 (patch)
tree5e7f4073ac1fb9f3abfb1171e5e529f6ea80b042 /src/Xmobar
parentdc97a1485806f8e9ff97a87e1572ea38ca70ab07 (diff)
downloadxmobar-ea075213baa7e6fe6ed519a6b5c70e7ae89a56a1.tar.gz
xmobar-ea075213baa7e6fe6ed519a6b5c70e7ae89a56a1.tar.bz2
linting and version bump
Diffstat (limited to 'src/Xmobar')
-rw-r--r--src/Xmobar/X11/CairoDraw.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Xmobar/X11/CairoDraw.hs b/src/Xmobar/X11/CairoDraw.hs
index feb4448..102e4ad 100644
--- a/src/Xmobar/X11/CairoDraw.hs
+++ b/src/Xmobar/X11/CairoDraw.hs
@@ -238,7 +238,7 @@ drawBoxes dctx surf ((from, to, b):(from', to', b'):bxs) =
if to < from' || b /= b'
then do drawBoxes' dctx surf (from, to, b)
drawBoxes dctx surf $ (from', to', b'):bxs
- else do drawBoxes dctx surf $ (from, to', b'):bxs
+ else drawBoxes dctx surf $ (from, to', b'):bxs
drawBoxes dctx surf [bi] = drawBoxes' dctx surf bi