make checkkey always fail for torrents

See comment.

1 files changed, 4 insertions, 6 deletions

diff --git a/Remote/BitTorrent.hs b/Remote/BitTorrent.hs
index c1190a562..902af1079 100644
--- a/Remote/BitTorrent.hs
+++ b/Remote/BitTorrent.hs
@@ -102,14 +102,12 @@ dropKey k = do
 	mapM_ (setUrlMissing bitTorrentUUID k) =<< getBitTorrentUrls k
 	return True
 
-{- This is a very poor check, but checking if a torrent has enough seeders
- - with all the pieces etc is quite hard.. and even if implemented, it
- - tells us nothing about the later state of the torrent.
- -
- - This is why this remote needs to default to untrusted!
+{- We punt and don't try to check if a torrent has enough seeders
+ - with all the pieces etc. That would be quite hard.. and even if
+ - implemented, it tells us nothing about the later state of the torrent.
  -}
 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.
 defaultUnTrusted :: Annex ()