diff options
author | Joey Hess <joey@kitenet.net> | 2012-08-23 15:22:23 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2012-08-23 15:24:15 -0400 |
commit | 715a9a2f8e788ffe0bc92bc02919a1825bda49a7 (patch) | |
tree | 259e5e683f7d7db3f6bba0192638fe77eeb36d05 /Fields.hs | |
parent | 487bdf0e24d34135da2e53bbcd2c97d892ed817a (diff) |
keep logs of failed transfers, and requeue them when doing a non-full scan
of a remote
Diffstat (limited to 'Fields.hs')
-rw-r--r-- | Fields.hs | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -18,6 +18,9 @@ data Field = Field , fieldCheck :: String -> Bool } +getField :: Field -> Annex (Maybe String) +getField = Annex.getField . fieldName + remoteUUID :: Field remoteUUID = Field "remoteuuid" $ -- does it look like a UUID? @@ -27,6 +30,3 @@ associatedFile :: Field associatedFile = Field "associatedfile" $ \f -> -- is the file a safe relative filename? not (isAbsolute f) && not ("../" `isPrefixOf` f) - -getField :: Field -> Annex (Maybe String) -getField = Annex.getField . fieldName |