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

Revert "let url claims optionally include a suggested filename"

Browse source 
This reverts commit 85df9c30e9.

Putting filename in the claim was a bad idea.
This commit is contained in:
Joey Hess 2014-12-11 14:09:57 -04:00
parent 30685751ea
commit 7ae16bb6f7
11 changed files with 26 additions and 67 deletions
Download patch file Download diff file Expand all files Collapse all files

3
Command/Whereis.hs
View file

@ -14,7 +14,6 @@ import Command
import Remote
import Logs.Trust
import Logs.Web
import Annex.URLClaim
cmd :: [Command]
cmd = [noCommit $ withOptions (jsonOption : keyOptions) $
@ -72,4 +71,4 @@ performRemote key remote = do
. filter (\(_, d) -> d == OtherDownloader)
. map getDownloader
<$> getUrls key
filterM (\u -> (==) <$> pure remote <*> (fst <$> urlClaim u)) us
filterM (\u -> (==) <$> pure remote <*> claimingUrl u) us