mirrors/git-annex
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages 1 Wiki Activity Actions

make everything build again after ByteString Key changes

Browse source
This commit is contained in:
Joey Hess 2019-01-11 16:34:04 -04:00
parent 151562b537
commit 727767e1e2
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
23 changed files with 79 additions and 72 deletions
Download patch file Download diff file Expand all files Collapse all files

5
Annex/Export.hs
View file

@ -15,6 +15,7 @@ import qualified Git
import qualified Types.Remote as Remote
import Config
import Messages
import Utility.FileSystemEncoding
import qualified Data.Map as M
import Control.Applicative
@ -35,8 +36,8 @@ exportKey sha = mk <$> catKey sha
where
mk (Just k) = AnnexKey k
mk Nothing = GitKey $ Key
{ keyName = Git.fromRef sha
, keyVariety = SHA1Key (HasExt False)
{ keyName = encodeBS $ Git.fromRef sha
, keyVariety = SHA1Key (HasExt False) mempty
, keySize = Nothing
, keyMtime = Nothing
, keyChunkSize = Nothing