aboutsummaryrefslogtreecommitdiffstats
path: root/app/Git.hs
diff options
context:
space:
mode:
authorLibravatar Alexander Foremny <aforemny@posteo.de>2023-12-08 06:27:15 +0100
committerLibravatar Alexander Foremny <aforemny@posteo.de>2023-12-08 06:43:01 +0100
commit0d20548e3846cb80acca07fad2a1dc3cfe024528 (patch)
tree6605eb393af99914b4cce483f56e1becbcbe073d /app/Git.hs
parent5842e730152a2ae11fc8772a505baa3ba81b1e9c (diff)
chore: drop tree-grepper
Regresses in that we only support Haskell for now, as Elm, Nix or Bash are not available as tree-sitter-* Haskell packages.
Diffstat (limited to 'app/Git.hs')
-rw-r--r--app/Git.hs3
1 files changed, 3 insertions, 0 deletions
diff --git a/app/Git.hs b/app/Git.hs
index a3c82fa..d308026 100644
--- a/app/Git.hs
+++ b/app/Git.hs
@@ -105,6 +105,9 @@ getCommitOf commitHash@(Commit hash) = do
}
_ -> throwIO E.NoCommits
+-- TODO Fix `readTextFileOf`
+--
+-- Handle file does not exist in `WorkingTree` case.
readTextFileOf :: CommitHash -> FilePath -> IO LT.Text
readTextFileOf WorkingTree filePath = LT.readFile filePath
readTextFileOf (Commit hash) filePath =