git.iko.soy/typeable/postgresql-simple
on master help sign in
On connection initialization, SET client_encoding TO UTF8
a188a11Leon P Smith
src/Database/PostgreSQL/Simple/Internal.hs+2−2
@@ -225,8 +225,8 @@ connectPostgreSQL connstr = do
225 let wconn = Connection{..}
225 let wconn = Connection{..}
226 version <- PQ.serverVersion conn
226 version <- PQ.serverVersion conn
227 let settings
227 let settings
228− | version < 80200 = "SET datestyle TO ISO"
228+ | version < 80200 = "SET datestyle TO ISO;SET client_encoding TO UTF8"
229− | otherwise = "SET standard_conforming_strings TO on;SET datestyle TO ISO"
229+ | otherwise = "SET datestyle TO ISO;SET client_encoding TO UTF8;SET standard_conforming_strings TO on"
230 _ <- execute_ wconn settings
230 _ <- execute_ wconn settings
231 return wconn
231 return wconn
232 _ -> do
232 _ -> do