diff --git a/Util.hs b/Util.hs
index 92fa031..d027c2b 100644
--- a/Util.hs
+++ b/Util.hs
@@ -32,9 +32,7 @@ getExt fp
 
 -- |Check if the file has an extension.
 hasExt :: FilePath -> Bool
-hasExt fp
-  | (<= 1) . length . splitBy (== '.') $ fp = False
-  | otherwise = True
+hasExt = (>1) . length . splitBy (== '.')
 
 
 -- |Split an array into subarrays depending on a given condition.