diff options
| author |  Joey Hess <joey@kitenet.net> | 2010-10-10 15:41:35 -0400 |
|---|---|---|
| committer | Joey Hess <joey@kitenet.net> | 2010-10-10 15:41:35 -0400 |
| commit | 7880dc16fef81bb6a8812c6b4e9578a6ae2b2879 (patch) | |
| tree | 7661b3879b848b3b6bdd5924740b74923c991936 /BackendChecksum.hs | |
| parent | eb577ee37ff1d631aa3580a235b9954043d0fb27 (diff) | |
update
Diffstat (limited to 'BackendChecksum.hs')
| -rw-r--r-- | BackendChecksum.hs | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/BackendChecksum.hs b/BackendChecksum.hs index 267f8099c..7b8d2c281 100644 --- a/BackendChecksum.hs +++ b/BackendChecksum.hs @@ -4,6 +4,7 @@ module BackendChecksum (backend) where import Backend +import GitRepo import qualified BackendFile import Data.Digest.Pure.SHA @@ -13,6 +14,6 @@ backend = BackendFile.backend { getKey = keyValue } --- -keyValue :: FilePath -> IO (Maybe Key) -keyValue k = error "unimplemented" -- TODO +-- checksum the file to get its key +keyValue :: GitRepo -> FilePath -> IO (Maybe Key) +keyValue k = error "checksum keyValue unimplemented" -- TODO |