git.iko.soy/typeable/postgresql-simple
on master help sign in
Merge pull request #160 from timmytofu/type-info-by-field-oid
711ced5Leon P Smith
src/Database/PostgreSQL/Simple/FromField.hs+1−1
compare with master
unifiedsplit
@@ -218,7 +218,7 @@ typename field = typname <$> typeInfo field
218
218
219typeInfo :: Field -> Conversion TypeInfo
219typeInfo :: Field -> Conversion TypeInfo
220typeInfo Field{..} = Conversion $ \conn -> do
220typeInfo Field{..} = Conversion $ \conn -> do
221− Ok <$> (getTypeInfo conn =<< PQ.ftype result column)
221+ Ok <$> (getTypeInfo conn typeOid)
222
222
223typeInfoByOid :: PQ.Oid -> Conversion TypeInfo
223typeInfoByOid :: PQ.Oid -> Conversion TypeInfo
224typeInfoByOid oid = Conversion $ \conn -> do
224typeInfoByOid oid = Conversion $ \conn -> do