Simplify a line that had HLint complaints

ndmitchell · Jan 14, 2024 · 7aaaecf · 7aaaecf
1 parent 5d7e561
commit 7aaaecf
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/Hint/Pragma.hs b/src/Hint/Pragma.hs
@@ -144,7 +144,7 @@ optToLanguage (L loc _, flags) languagePragmas
       -- 'ls' is a list of language features enabled by this
       -- OPTIONS_GHC pragma that are not enabled by LANGUAGE pragmas
       -- in this module.
-      let ls = filter (not . (`elem` languagePragmas)) (concat $ catMaybes vs) in
+      let ls = concatMap (filter (`notElem` languagePragmas)) $ catMaybes vs in
       Just (res, ls)
   where
     -- Try reinterpreting each flag as a list of language features