dropping from web
This commit is contained in:
parent
67e82b1c3d
commit
ea5d7292e6
4 changed files with 25 additions and 17 deletions
|
@ -72,9 +72,9 @@ uploadKey _ _ _ = do
|
|||
return False
|
||||
|
||||
dropKey :: Key -> Annex Bool
|
||||
dropKey _ = do
|
||||
warning "removal from web not supported"
|
||||
return False
|
||||
dropKey k = do
|
||||
mapM_ (setUrlMissing k) =<< getUrls k
|
||||
return True
|
||||
|
||||
checkKey :: Key -> Annex (Either String Bool)
|
||||
checkKey key = do
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue