From dfba9cfeb5310b4c94436e1b3df64d8bbd60a4eb Mon Sep 17 00:00:00 2001
From: Yuchen Pei <hi@ypei.me>
Date: Thu, 18 Aug 2022 15:34:01 +1000
Subject: linting preprocessor and ghcutils

---
 src/HaskellCodeExplorer/Preprocessor.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/HaskellCodeExplorer/Preprocessor.hs')

diff --git a/src/HaskellCodeExplorer/Preprocessor.hs b/src/HaskellCodeExplorer/Preprocessor.hs
index abea661..eb832ce 100644
--- a/src/HaskellCodeExplorer/Preprocessor.hs
+++ b/src/HaskellCodeExplorer/Preprocessor.hs
@@ -49,7 +49,7 @@ createSourceCodeTransformation currentModulePath originalSourceCode sourceCodeAf
           Left _ -> acc
       totalLines = length numberedLines
       pragmas    = L.reverse . L.foldl' addPragma [] $ numberedLines
-      pragmaPath = filePath :: LinePragma -> HaskellFilePath
+      pragmaPath LinePragma {..} = filePath
       currentFileExtension =
         takeExtension . T.unpack . getHaskellFilePath $ currentFilePath
       standardHeaderFiles =
-- 
cgit v1.2.3