diff options
| -rwxr-xr-x[-rw-r--r--] | Locations.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Locations.hs b/Locations.hs index cb98b840c..ba1e74150 100644..100755 --- a/Locations.hs +++ b/Locations.hs @@ -259,7 +259,7 @@ gitAnnexAssistantDefaultDir = "annex" - than .git to be used. -} isLinkToAnnex :: FilePath -> Bool -isLinkToAnnex s = ('/':objectDir) `isInfixOf` s +isLinkToAnnex s = (pathSeparator:objectDir) `isInfixOf` s {- Converts a key into a filename fragment without any directory. - |