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

improve layout

Browse source
This commit is contained in:
Joey Hess 2019-10-29 17:08:36 -04:00
parent e8437ae7a3
commit aa27969e55
No known key found for this signature in database
GPG key ID: DB12DB0FF05F8F38
1 changed files with 1 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Database/Types.hs
View file

@ -99,7 +99,7 @@ toSSha (Ref s) = SSha s
fromSSha :: SSha -> Ref fromSSha :: SSha -> Ref
fromSSha (SSha s) = Ref s fromSSha (SSha s) = Ref s
instance PersistField SSha where instance PersistField SSha where
toPersistValue (SSha b) = toPersistValue b toPersistValue (SSha b) = toPersistValue b
fromPersistValue v = SSha <$> fromPersistValue v fromPersistValue v = SSha <$> fromPersistValue v