From 13e35e692d07ad9a21a5a8b4bd8cb5326098997e Mon Sep 17 00:00:00 2001
From: jao <jao@gnu.org>
Date: Mon, 12 Jul 2021 23:07:08 +0100
Subject: Nit, for homogeneity's sake

---
 src/Xmobar/X11/Window.hs | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/src/Xmobar/X11/Window.hs b/src/Xmobar/X11/Window.hs
index 13c99f0..14a0016 100644
--- a/src/Xmobar/X11/Window.hs
+++ b/src/Xmobar/X11/Window.hs
@@ -1,7 +1,7 @@
 -----------------------------------------------------------------------------
 -- |
 -- Module      :  Window
--- Copyright   :  (c) 2011-18, 20 Jose A. Ortega Ruiz
+-- Copyright   :  (c) 2011-18, 20, 21 Jose A. Ortega Ruiz
 --             :  (c) 2012 Jochen Keil
 -- License     :  BSD-style (see LICENSE)
 --
@@ -80,11 +80,11 @@ setPosition c p rs ht =
   case p' of
     Top -> Rectangle rx ry rw h
     TopP l r -> Rectangle (rx + fi l) ry (rw - fi l - fi r) h
-    TopH ch -> Rectangle rx ry rw $ mh ch
+    TopH ch -> Rectangle rx ry rw (mh ch)
     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 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)
-- 
cgit v1.2.3