postgresql-pure-0.1.0.0: test-relational-record/DataSource.hs

module DataSource (connect) where

import           Data.Default.Class       (def)
import           Database.HDBC.PostgreSQL (Connection, connectPostgreSQL)

connect :: IO Connection
connect = connectPostgreSQL "user='postgres'"