From 78b6df0e69c4b7abe2d27eb7dc1ae4c7a044e044 Mon Sep 17 00:00:00 2001
From: Tomas Janousek <tomi@nomi.cz>
Date: Mon, 5 Apr 2021 21:24:43 +0100
Subject: [PATCH] Drop some recently added trailing whitespace

---
 CHANGES.md               | 4 ++--
 XMonad/Layout/Renamed.hs | 2 +-
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/CHANGES.md b/CHANGES.md
index 49d787a5..66dddfb6 100644
--- a/CHANGES.md
+++ b/CHANGES.md
@@ -299,7 +299,7 @@
   * `XMonad.Hooks.DynamicLog`
 
     - Added `xmobarProp`, for property-based alternative to `xmobar`.
-    
+
     - Add the -dock argument to the dzen spawn arguments
 
     - The API for this module is frozen: this is now a compatibility wrapper.
@@ -531,7 +531,7 @@
 
   * `XMonad.Layout.Renamed`
 
-    - Added `KeepWordsLeft` and `KeepWordsRight` for keeping certain number of 
+    - Added `KeepWordsLeft` and `KeepWordsRight` for keeping certain number of
       words in left or right direction in layout description.
 
 ## 0.16
diff --git a/XMonad/Layout/Renamed.hs b/XMonad/Layout/Renamed.hs
index b464b260..3b349c9d 100644
--- a/XMonad/Layout/Renamed.hs
+++ b/XMonad/Layout/Renamed.hs
@@ -61,7 +61,7 @@ apply (CutLeft i) s = drop i s
 apply (CutRight i) s = take (length s - i) s
 apply (CutWordsLeft i) s = unwords $ drop i $ words s
 apply (CutWordsRight i) s = let ws = words s
-                           in unwords $ take (length ws - i) ws                        
+                           in unwords $ take (length ws - i) ws
 apply (KeepWordsLeft i) s = unwords $ take i $ words s
 apply (KeepWordsRight i) s = let ws = words s
                            in unwords $ drop (length ws - i) ws