aboutsummaryrefslogtreecommitdiffstats
path: root/app/Git.hs
diff options
context:
space:
mode:
Diffstat (limited to 'app/Git.hs')
-rw-r--r--app/Git.hs6
1 files changed, 0 insertions, 6 deletions
diff --git a/app/Git.hs b/app/Git.hs
index 2e8fa82..e195d1b 100644
--- a/app/Git.hs
+++ b/app/Git.hs
@@ -97,12 +97,6 @@ readTextFileOfText = readTextFileOf LT.readFile LT.decodeUtf8
readTextFileOfBS :: CommitHash -> FilePath -> IO LB.ByteString
readTextFileOfBS = readTextFileOf LB.readFile id
--- REVIEW Suggestion: we could use `id` instead of `\x -> x`
---
--- REVIEW OK!
---
--- RESOLVED
-
readTextFileOf :: (FilePath -> IO a) -> (LB.ByteString -> a) -> CommitHash -> FilePath -> IO a
readTextFileOf readFile _ WorkingTree filePath =
catch