diff --git a/Database/Persist/Postgresql.hs b/Database/Persist/Postgresql.hs
--- a/Database/Persist/Postgresql.hs
+++ b/Database/Persist/Postgresql.hs
@@ -11,6 +11,7 @@
     , module Database.Persist.GenericSql
     , ConnectionString
     , PostgresConf (..)
+    , openSimpleConn
     ) where
 
 import Database.Persist hiding (Entity (..))
@@ -102,7 +103,11 @@
 
 open' :: ConnectionString -> IO Connection
 open' cstr = do
-    conn <- PG.connectPostgreSQL cstr
+    PG.connectPostgreSQL cstr >>= openSimpleConn
+
+-- | Generate a 'Connection' from a 'PG.Connection'
+openSimpleConn :: PG.Connection -> IO Connection
+openSimpleConn conn = do
     smap <- newIORef $ Map.empty
     return Connection
         { prepare    = prepare' conn
@@ -425,7 +430,7 @@
     getType "float8"      = Right $ SqlReal
     getType "bytea"       = Right $ SqlBlob
     getType "time"        = Right $ SqlTime
-    getType a             = Left $ "Unknown type: " `T.append` a
+    getType a             = Right $ SqlOther a
 getColumn _ _ x =
     return $ Left $ pack $ "Invalid result from information_schema: " ++ show x
 
diff --git a/persistent-postgresql.cabal b/persistent-postgresql.cabal
--- a/persistent-postgresql.cabal
+++ b/persistent-postgresql.cabal
@@ -1,5 +1,5 @@
 name:            persistent-postgresql
-version:         1.0.1
+version:         1.0.2
 license:         MIT
 license-file:    LICENSE
 author:          Felipe Lessa, Michael Snoyman <michael@snoyman.com>