diff --git a/src/Guide/Utils.hs b/src/Guide/Utils.hs
index 8a75120..a79b1dc 100644
--- a/src/Guide/Utils.hs
+++ b/src/Guide/Utils.hs
@@ -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