From a9286e8c39cc8de56de7a723c9ddabd78ac64198 Mon Sep 17 00:00:00 2001
From: Josh Rahm <rahm@google.com>
Date: Tue, 29 Mar 2022 12:32:25 -0600
Subject: Remove trailing whitespace

---
 src/Internal/CornerLayout.hs | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'src/Internal/CornerLayout.hs')

diff --git a/src/Internal/CornerLayout.hs b/src/Internal/CornerLayout.hs
index b3898fc..5545aef 100644
--- a/src/Internal/CornerLayout.hs
+++ b/src/Internal/CornerLayout.hs
@@ -21,15 +21,15 @@ instance LayoutClass Corner a where
 
         vn = (length ws - 1) `div` 2
         hn = (length ws - 1) - vn
-      in 
+      in
         case ws of
           [a] -> [(a, screen)]
           [a, b] -> [
             (a, Rectangle x y w' h),
             (b, Rectangle (x + fromIntegral w') y (w - w') h)]
-          _ -> 
+          _ ->
             zip ws $ map (
-                \(Rectangle x' y' w h) -> Rectangle (x + x') (y + y') w h) $ 
+                \(Rectangle x' y' w h) -> Rectangle (x + x') (y + y') w h) $
               corner :
                 splitVert vertRect vn ++
                 splitHoriz horizRect hn
-- 
cgit