From 2c59c111beffe0c536d9848c4416650609df449b Mon Sep 17 00:00:00 2001 From: Leon P Smith Date: Tue, 26 Mar 2013 12:32:23 -0400 Subject: [PATCH] More documentation fixes --- src/Database/PostgreSQL/Simple/FromField.hs | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/src/Database/PostgreSQL/Simple/FromField.hs b/src/Database/PostgreSQL/Simple/FromField.hs index 57026170..4f55044b 100644 --- a/src/Database/PostgreSQL/Simple/FromField.hs +++ b/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