fix comment

This commit is contained in:
Joey Hess 2025-02-11 14:07:01 -04:00
parent 27a0bacc49
commit 9dc43396b3
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38

View file

@ -58,7 +58,7 @@ fromTopFilePath p repo = combine (repoPath repo) (getTopFilePath p)
toTopFilePath :: OsPath -> Git.Repo -> IO TopFilePath
toTopFilePath file repo = TopFilePath <$> relPathDirToFile (repoPath repo) file
{- The input RawFilePath must already be relative to the top of the git
{- The input path must already be relative to the top of the git
- repository -}
asTopFilePath :: OsPath -> TopFilePath
asTopFilePath file = TopFilePath file