mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

match also / path separator on windows

Browse source
This commit is contained in:
Joey Hess 2019-12-11 17:08:08 -04:00
parent c19211774f
commit cee0d738fc
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
Annex/Journal.hs
View file

@ -112,7 +112,7 @@ journalFile :: RawFilePath -> Git.Repo -> RawFilePath
journalFile file repo = gitAnnexJournalDir' repo P.</> S.map mangle file
where
mangle c
| c == P.pathSeparator = fromIntegral (ord '_')
| P.isPathSeparator c = fromIntegral (ord '_')
| otherwise = c
{- Converts a journal file (relative to the journal dir) back to the