@@ -261,6 +261,8 @@ instance ToParam (NetAddr IP) 'PGinet where toParam = K . Encoding.inet
261261instance ToParam Char ('PGchar 1) where toParam = K . Encoding.char_utf8
262262instance ToParam Strict.Text 'PGtext where toParam = K . Encoding.text_strict
263263instance ToParam Lazy.Text 'PGtext where toParam = K . Encoding.text_lazy
264+instance ToParam String 'PGtext where
265+ toParam = K . Encoding.text_strict . Strict.pack
264266instance ToParam Strict.ByteString 'PGbytea where
265267 toParam = K . Encoding.bytea_strict
266268instance ToParam Lazy.ByteString 'PGbytea where
@@ -437,6 +439,8 @@ instance FromValue 'PGinet (NetAddr IP) where fromValue = Decoding.inet
437439instance FromValue ('PGchar 1) Char where fromValue = Decoding.char
438440instance FromValue 'PGtext Strict.Text where fromValue = Decoding.text_strict
439441instance FromValue 'PGtext Lazy.Text where fromValue = Decoding.text_lazy
442+instance FromValue 'PGtext String where
443+ fromValue = Strict.unpack <$> Decoding.text_strict
440444instance FromValue 'PGbytea Strict.ByteString where
441445 fromValue = Decoding.bytea_strict
442446instance FromValue 'PGbytea Lazy.ByteString where