check present when testing readonly too

The object is supposed to be present on the readonly remote; have to
assume the location log is right about that, so the presence check
should succeed.
This commit is contained in:
Joey Hess 2019-01-17 16:08:25 -04:00
parent 3896ff8253
commit f8e7ea77fc
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38

View file

@ -162,7 +162,7 @@ test st r k = catMaybes
, whenwritable $ check "storeKey" store
, whenwritable $ present True
, whenwritable $ check "storeKey when already present" store
, whenwritable $ present True
, Just $ present True
, Just $ check "retrieveKeyFile" $ do
lockContentForRemoval k removeAnnex
get