summaryrefslogtreecommitdiff
path: root/Backend/SHA1.hs
diff options
context:
space:
mode:
Diffstat (limited to 'Backend/SHA1.hs')
-rw-r--r--Backend/SHA1.hs16
1 files changed, 16 insertions, 0 deletions
diff --git a/Backend/SHA1.hs b/Backend/SHA1.hs
new file mode 100644
index 000000000..caece6b78
--- /dev/null
+++ b/Backend/SHA1.hs
@@ -0,0 +1,16 @@
+{- git-annex "SHA1" backend
+ - -}
+
+module Backend.SHA1 (backend) where
+
+import qualified Backend.File
+import TypeInternals
+
+backend = Backend.File.backend {
+ name = "SHA1",
+ getKey = keyValue
+}
+
+-- checksum the file to get its key
+keyValue :: FilePath -> Annex (Maybe Key)
+keyValue k = error "SHA1 keyValue unimplemented" -- TODO