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

make checkkey always fail for torrents

Browse source 
See comment.
This commit is contained in:
Joey Hess 2014-12-17 14:54:54 -04:00
parent 8f965a001e
commit 6ca54c521d
1 changed files with 4 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

10
Remote/BitTorrent.hs
View file

@ -102,14 +102,12 @@ dropKey k = do
mapM_ (setUrlMissing bitTorrentUUID k) =<< getBitTorrentUrls k mapM_ (setUrlMissing bitTorrentUUID k) =<< getBitTorrentUrls k
return True return True
{- This is a very poor check, but checking if a torrent has enough seeders {- We punt and don't try to check if a torrent has enough seeders
- with all the pieces etc is quite hard.. and even if implemented, it - with all the pieces etc. That would be quite hard.. and even if
- tells us nothing about the later state of the torrent. - implemented, it tells us nothing about the later state of the torrent.
-
- This is why this remote needs to default to untrusted!
-} -}
checkKey :: Key -> Annex Bool checkKey :: Key -> Annex Bool
checkKey key = not . null <$> getBitTorrentUrls key checkKey key = error "cannot reliably check torrent status"
-- Makes this remote UnTrusted, unless it already has a trust set. -- Makes this remote UnTrusted, unless it already has a trust set.
defaultUnTrusted :: Annex () defaultUnTrusted :: Annex ()