summaryrefslogtreecommitdiff
path: root/Backend
diff options
context:
space:
mode:
authorGravatar Joey Hess <joey@kitenet.net>2013-09-25 03:09:06 -0400
committerGravatar Joey Hess <joey@kitenet.net>2013-09-25 03:09:06 -0400
commitd9c5d32c34885cac67c44c633c5351461902d166 (patch)
tree2628093b15b5564a33364cf67d54d87ef0f2474e /Backend
parent2270913743982ab33c68d17c8ed68326e1711f95 (diff)
hlint
test suite still passes
Diffstat (limited to 'Backend')
-rw-r--r--Backend/SHA.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/Backend/SHA.hs b/Backend/SHA.hs
index 7150a4202..42cde3f57 100644
--- a/Backend/SHA.hs
+++ b/Backend/SHA.hs
@@ -31,11 +31,11 @@ backends :: [Backend]
backends = catMaybes $ map genBackendE sizes ++ map genBackend sizes
genBackend :: SHASize -> Maybe Backend
-genBackend size = Just $ Backend
+genBackend size = Just Backend
{ name = shaName size
, getKey = keyValue size
, fsckKey = Just $ checkKeyChecksum size
- , canUpgradeKey = Just $ needsUpgrade
+ , canUpgradeKey = Just needsUpgrade
}
genBackendE :: SHASize -> Maybe Backend