summaryrefslogtreecommitdiffhomepage
path: root/src/Xmobar/X11
diff options
context:
space:
mode:
Diffstat (limited to 'src/Xmobar/X11')
-rw-r--r--src/Xmobar/X11/CairoDraw.hs5
1 files changed, 5 insertions, 0 deletions
diff --git a/src/Xmobar/X11/CairoDraw.hs b/src/Xmobar/X11/CairoDraw.hs
index 527b68a..9784774 100644
--- a/src/Xmobar/X11/CairoDraw.hs
+++ b/src/Xmobar/X11/CairoDraw.hs
@@ -71,6 +71,11 @@ renderSegment mh conf surface lyt (offset,actions) seg@(Text _, _, idx, a) = do
actions' = case a of Just as -> (as, offset, end):actions; _ -> actions
return (end, actions')
+renderSegment _ _ _ _ (offset,actions) (Hspace n, _, _, a) = do
+ let end = offset + n
+ actions' = case a of Just as -> (as, offset, end):actions; _ -> actions
+ return (end, actions')
+
renderSegment _h _c _surface _lyt acc _segment = pure acc
background :: Config -> SRGB.Colour Double -> C.Render ()