diff options
| author |  Joey Hess <joey@kitenet.net> | 2013-01-11 15:43:09 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2013-01-11 16:03:45 -0400 |
| commit | 5387b44657d01e436282e3ae6650a8f083b5ef00 (patch) | |
| tree | c208fb8505e28d1998ea96a1cf63929e9053749d /GitAnnexShell.hs | |
| parent | 4979c878da4dcacf699b4d0b2e2f173e0d0bd06e (diff) | |
safe recv-key in direct mode
Checks the key's size and checksum. This is sorta expensive, but it avoids
needing to add another round-trip to the protocol.
Diffstat (limited to 'GitAnnexShell.hs')
| -rw-r--r-- | GitAnnexShell.hs | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/GitAnnexShell.hs b/GitAnnexShell.hs index f77347a1c..fca36cfc5 100644 --- a/GitAnnexShell.hs +++ b/GitAnnexShell.hs @@ -122,6 +122,7 @@ checkField :: (String, String) -> Bool checkField (field, value) | field == fieldName remoteUUID = fieldCheck remoteUUID value | field == fieldName associatedFile = fieldCheck associatedFile value + | field == fieldName direct = fieldCheck direct value | otherwise = False failure :: IO () |