summaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
authorexorcist365 <joantmilev@gmail.com>2022-02-13 18:53:46 +0200
committerexorcist365 <joantmilev@gmail.com>2022-02-13 18:53:46 +0200
commitbfd02987485210646800f4184a21b1143f2e301c (patch)
treef7526094d2c7947923e4ce4fbe0bd4a547e71b97
parentb7ca54651bb12ac7335d525cdd4962c765ec6d0c (diff)
downloadxmobar-bfd02987485210646800f4184a21b1143f2e301c.tar.gz
xmobar-bfd02987485210646800f4184a21b1143f2e301c.tar.bz2
Use nh' for displaying the bar on the bottom of the screen. Fixes #555
-rw-r--r--src/Xmobar/X11/Window.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Xmobar/X11/Window.hs b/src/Xmobar/X11/Window.hs
index 14a0016..3612a19 100644
--- a/src/Xmobar/X11/Window.hs
+++ b/src/Xmobar/X11/Window.hs
@@ -84,7 +84,7 @@ setPosition c p rs ht =
TopW a i -> Rectangle (ax a i) ry (nw i) h
TopSize a i ch -> Rectangle (ax a i) ry (nw i) (mh ch)
Bottom -> Rectangle rx ny rw h
- BottomH ch -> Rectangle rx ny rw (mh ch)
+ BottomH ch -> Rectangle rx (ny' ch) rw (mh ch)
BottomW a i -> Rectangle (ax a i) ny (nw i) h
BottomP l r -> Rectangle (rx + fi l) ny (rw - fi l - fi r) h
BottomSize a i ch -> Rectangle (ax a i) (ny' ch) (nw i) (mh ch)