summaryrefslogtreecommitdiff
path: root/Backend/SHA.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Backend/SHA.hs')
-rw-r--r--Backend/SHA.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Backend/SHA.hs b/Backend/SHA.hs
index 94ebe093e..8ed00b707 100644
--- a/Backend/SHA.hs
+++ b/Backend/SHA.hs
@@ -119,7 +119,7 @@ checkKeyChecksum size key = do
then return True
else do
s <- shaN size file
- if s == keyName key
+ if s == dropExtension (keyName key)
then return True
else do
dest <- moveBad key