move
move use of </> into DavLocation so it always uses unix filepaths due to imports
This commit is contained in:
parent
f064008543
commit
3e41a8f032
2 changed files with 6 additions and 1 deletions
|
@ -62,6 +62,11 @@ exportLocation l =
|
|||
keyTmpLocation :: Key -> DavLocation
|
||||
keyTmpLocation = tmpLocation . fromRawFilePath . keyFile
|
||||
|
||||
exportTmpLocation :: ExportLocation -> Key -> DavLocation
|
||||
exportTmpLocation l k = d </> keyTmpLocation k
|
||||
where
|
||||
d = takeDirectory (fromRawFilePath (fromExportLocation l))
|
||||
|
||||
tmpLocation :: FilePath -> DavLocation
|
||||
tmpLocation f = "git-annex-webdav-tmp-" ++ f
|
||||
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue