git.iko.soy/typeable/postgresql-simple
on master help sign in
Fix wrong parsing of arrays with text "NULL".
74b2f4aEdgar Gomes Araujo
src/Database/PostgreSQL/Simple/FromField.hs+1−1
compare with master
unifiedsplit
@@ -526,7 +526,7 @@ fromArray fieldParser typeInfo f = sequence . (parseIt <$>) <$> array delim
526 fElem = f{ typeOid = typoid (typelem typeInfo) }
526 fElem = f{ typeOid = typoid (typelem typeInfo) }
527
527
528 parseIt item =
528 parseIt item =
529− fieldParser f' $ if item' == "NULL" then Nothing else Just item'
529+ fieldParser f' $ if item == Arrays.Plain "NULL" then Nothing else Just item'
530 where
530 where
531 item' = fmt delim item
531 item' = fmt delim item
532 f' | Arrays.Array _ <- item = f
532 f' | Arrays.Array _ <- item = f