diff --git a/lib/CheckMap.hs b/lib/CheckMap.hs
index 63b264aed53ed409f7aef52a0737120b61bdfba9..51b44966999674d8bbc0b29e4670b6eaa420f558 100644
--- a/lib/CheckMap.hs
+++ b/lib/CheckMap.hs
@@ -155,11 +155,10 @@ checkLayerRec config depth layers =
 
         -- Lintresults for sublayers and subsublayers etc.
         subresults' =
-          checkLayerRec config depth
-          $ sublayers
+          checkLayerRec config depth sublayers
 
         -- lintresult for the parent layer
-        parentResult = runLintWriter config parentAdjusted depth (checkLayer)
+        parentResult = runLintWriter config parentAdjusted depth checkLayer
 
         -- the parent layer with adjusted sublayers
         parentAdjusted =
diff --git a/lib/LintWriter.hs b/lib/LintWriter.hs
index 5a6fc7d5279224e4807085891c175c8842a48a54..eb7d13849b91f6e58d9f74e1e7ff83dea107be77 100644
--- a/lib/LintWriter.hs
+++ b/lib/LintWriter.hs
@@ -1,4 +1,5 @@
 {-# LANGUAGE DeriveAnyClass    #-}
+{-# LANGUAGE DeriveFunctor     #-}
 {-# LANGUAGE DeriveGeneric     #-}
 {-# LANGUAGE FlexibleContexts  #-}
 {-# LANGUAGE FlexibleInstances #-}
@@ -7,7 +8,6 @@
 {-# LANGUAGE OverloadedStrings #-}
 {-# LANGUAGE RankNTypes        #-}
 {-# LANGUAGE TupleSections     #-}
-{-# LANGUAGE DeriveFunctor     #-}
 {-# OPTIONS_GHC -Wno-missing-signatures #-}
 
 -- | a monad that collects warnings, outputs, etc,
diff --git a/lib/Properties.hs b/lib/Properties.hs
index cf63e129441f814b3549f7db9a1b8a70d9f5019e..66cedd904a678f988c0a79bea2d1ddee42c25751 100644
--- a/lib/Properties.hs
+++ b/lib/Properties.hs
@@ -160,7 +160,7 @@ checkTileset = do
   tileset <- askContext
   case tilesetImage tileset of
     Just str -> unwrapPath str (dependsOn . Local)
-    Nothing -> complain "Tileset does not refer to an image."
+    Nothing  -> complain "Tileset does not refer to an image."
 
   refuseDoubledNames (getProperties tileset)