diff options
Diffstat (limited to 'Backend')
| -rw-r--r-- | Backend/SHA.hs | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/Backend/SHA.hs b/Backend/SHA.hs index 3a54a8871..d44982117 100644 --- a/Backend/SHA.hs +++ b/Backend/SHA.hs @@ -16,12 +16,12 @@ import qualified Build.SysConfig as SysConfig type SHASize = Int +-- order is slightly significant; want SHA256 first, and more general +-- sizes earlier sizes :: [Int] -sizes = [1, 256, 512, 224, 384] +sizes = [256, 1, 512, 224, 384] backends :: [Backend Annex] --- order is slightly significant; want sha1 first, and more general --- sizes earlier backends = catMaybes $ map genBackend sizes ++ map genBackendE sizes genBackend :: SHASize -> Maybe (Backend Annex) |