parent
bb4f2af602
commit
da0a696c96
2 changed files with 4 additions and 20 deletions
|
@ -247,6 +247,10 @@ test runannex mkr mkk =
|
|||
, check "storeKey when already present" $ \r k ->
|
||||
whenwritable r $ runBool (store r k)
|
||||
, check ("present " ++ show True) $ \r k -> present r k True
|
||||
, check "retrieveKeyFile" $ \r k -> do
|
||||
lockContentForRemoval k noop removeAnnex
|
||||
get r k
|
||||
, check "fsck downloaded object" fsck
|
||||
, check "retrieveKeyFile resume from 0" $ \r k -> do
|
||||
tmp <- fromRawFilePath <$> prepTmp k
|
||||
liftIO $ writeFile tmp ""
|
||||
|
@ -270,10 +274,6 @@ test runannex mkr mkk =
|
|||
lockContentForRemoval k noop removeAnnex
|
||||
get r k
|
||||
, check "fsck downloaded object" fsck
|
||||
, check "retrieveKeyFile" $ \r k -> do
|
||||
lockContentForRemoval k noop removeAnnex
|
||||
get r k
|
||||
, check "fsck downloaded object" fsck
|
||||
, check "removeKey when present" $ \r k ->
|
||||
whenwritable r $ runBool (remove r k)
|
||||
, check ("present " ++ show False) $ \r k ->
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue