Permalink
Browse files

More documentation fixes

  • Loading branch information...
1 parent 2c822c8 commit 2c59c111beffe0c536d9848c4416650609df449b @lpsmith committed Mar 26, 2013
Showing with 4 additions and 4 deletions.
  1. +4 −4 src/Database/PostgreSQL/Simple/FromField.hs
@@ -39,11 +39,11 @@ instance FromField UUID where
if typeOid f /= builtin2oid UUID
then returnError Incompatible f \"\"
else case B.unpack \`fmap\` mdata of
- Nothing -> returnError UnexpectedNull f \"\"
- Just data ->
- case [ x | (x,t) <- reads data, (\"\",\"\") <- lex t ] of
+ Nothing -> returnError UnexpectedNull f \"\"
+ Just dat ->
+ case [ x | (x,t) <- reads dat, (\"\",\"\") <- lex t ] of
[x] -> return x
- _ -> returnError ConversionError f data
+ _ -> returnError ConversionError f dat
@
Note that because PostgreSQL's @uuid@ type is built into postgres and is

0 comments on commit 2c59c11

Please sign in to comment.