aelve/guide
1
1
Fork 0
mirror of https://github.com/aelve/guide.git synced 2024-12-23 12:52:31 +03:00
Code Issues Projects Releases Wiki Activity

Fix a silly bug with SafeCopy

Browse Source
This commit is contained in:
Artyom 2017-01-31 03:10:09 +03:00
parent e001e2823e
commit c04adb3239
No known key found for this signature in database
GPG Key ID: B8E35A33FF522710
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/Guide/Utils.hs
View File

@ -190,7 +190,7 @@ newtype Uid a = Uid {uidToText :: Text}
-- • In the instance declaration for ‘SafeCopy (Uid a)’
instance SafeCopy (Uid a) where
putCopy = contain . safePut . uidToText
getCopy = contain safeGet
getCopy = contain (Uid <$> safeGet)
version = 2
kind = base