add unlocked flag for git-annex-shell recvkey

The direct flag is also set when sending unlocked content, to support old
versions of git-annex-shell. At some point, the direct flag will be
removed, and only the unlocked flag will be used.
This commit is contained in:
Joey Hess 2015-12-26 13:59:27 -04:00
parent f324ad24c1
commit f776ac0a11
Failed to extract signature
5 changed files with 14 additions and 6 deletions

View file

@ -144,6 +144,7 @@ checkField :: (String, String) -> Bool
checkField (field, val)
| field == fieldName remoteUUID = fieldCheck remoteUUID val
| field == fieldName associatedFile = fieldCheck associatedFile val
| field == fieldName unlocked = fieldCheck unlocked val
| field == fieldName direct = fieldCheck direct val
| field == fieldName autoInit = fieldCheck autoInit val
| otherwise = False