From 32d9bd8ccdb48162853d9dfa6a81d0412d4fadf7 Mon Sep 17 00:00:00 2001
From: Egor Tensin <Egor.Tensin@gmail.com>
Date: Tue, 13 Jun 2017 06:26:05 +0300
Subject: fix HLint warnings

---
 app/RemovePath.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'app/RemovePath.hs')

diff --git a/app/RemovePath.hs b/app/RemovePath.hs
index 56ea66f..779de6f 100644
--- a/app/RemovePath.hs
+++ b/app/RemovePath.hs
@@ -74,7 +74,7 @@ removePath options = runExceptT doRemovePath >>= either ioError return
         let expandable = WindowsEnv.valueExpandable oldValue
         let joined = WindowsEnv.valueString oldValue
         let split = WindowsEnv.pathSplit joined
-        let remaining = filter (flip notElem pathsToRemove) split
+        let remaining = filter (`notElem` pathsToRemove) split
         when (length split /= length remaining) $ do
             let newValue = WindowsEnv.Value expandable (WindowsEnv.pathJoin remaining)
             promptAndEngrave profile oldValue newValue
-- 
cgit v1.2.3