@@ -42,7 +42,7 @@ instance Binary ImportMethod where
42 0 -> liftM As get
42 0 -> liftM As get
43 1 -> liftM Importing get
43 1 -> liftM Importing get
44 2 -> liftM Hiding get
44 2 -> liftM Hiding get
45− _ -> error "Error valid ImportMethod type from serialized string"
45+ _ -> error "Error reading valid ImportMethod type from serialized string"
47data MetadataModule t v = MetadataModule {
47data MetadataModule t v = MetadataModule {
48 names :: [String],
48 names :: [String],