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

dropdrive drops the leading slash, so need fil:///

Browse source
This commit is contained in:
Joey Hess 2015-02-11 12:22:43 -04:00
parent dbf307e4b8
commit c1f6ac8fac
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
Test.hs
View file

@ -1361,7 +1361,7 @@ test_addurl :: Assertion
test_addurl = intmpclonerepo $ do test_addurl = intmpclonerepo $ do
-- file:// only; this test suite should not hit the network -- file:// only; this test suite should not hit the network
f <- absPath "myurl" f <- absPath "myurl"
let url = replace "\\" "/" ("file://" ++ dropDrive f) let url = replace "\\" "/" ("file:///" ++ dropDrive f)
writeFile f "foo" writeFile f "foo"
git_annex "addurl" [url] @? ("addurl failed on " ++ url) git_annex "addurl" [url] @? ("addurl failed on " ++ url)
let dest = "addurlurldest" let dest = "addurlurldest"