From afbd222c159eb6195a578595a629b88e66cdc45f Mon Sep 17 00:00:00 2001
From: Gregor Kleen <kleen@cip.ifi.lmu.de>
Date: Tue, 1 Oct 2019 20:01:43 +0200
Subject: [PATCH] chore: fix hlint

---
 src/Handler/Course/Show.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/Handler/Course/Show.hs b/src/Handler/Course/Show.hs
index 7f14b544e..36ff17ece 100644
--- a/src/Handler/Course/Show.hs
+++ b/src/Handler/Course/Show.hs
@@ -253,7 +253,7 @@ getCShowR tid ssh csh = do
       showNewsFiles fs = and
         [ not $ null fs
         , length fs <= 3
-        , all (not . elem pathSeparator . view _2) fs
+        , all (notElem pathSeparator . view _2) fs
         ]
   mayCreateNews <- hasWriteAccessTo $ CourseR tid ssh csh CNewsNewR