#lang scheme/base
;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; SESSION.plt - a session store built on top of bzlib/dbi
;;
;; Bonzai Lab, LLC.  All rights reserved.
;;
;; Licensed under LGPL.
;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; setup/spgsql.ss - setup for spgsql
;; yc 11/15/2009 - first version
(require "base.ss" "../depend.ss"
         (planet bzlib/dbd-spgsql))

(define (setup-session-store/spgsql! host port user pass schema)
  (setup-session-store! (connect 'spgsql
                                 '#:server host
                                 '#:port port 
                                 '#:user user 
                                 '#:password pass
                                 '#:database schema)
                        "postgres"))

(provide setup-session-store/spgsql!)