Have *pgconn-port* default to PGPORT env it set, or 5432.

This commit is contained in:
Dimitri Fontaine 2013-10-18 11:38:14 +02:00
parent f768f74cbb
commit a86ff9666e

View File

@ -59,7 +59,7 @@
;;; PostgreSQL Connection Credentials and Session Settings
;;;
(defparameter *pgconn-host* "localhost")
(defparameter *pgconn-port* 5432)
(defparameter *pgconn-port* (or (uiop:getenv "PGPORT") 5432))
(defparameter *pgconn-user* (uiop:getenv "USER"))
(defparameter *pgconn-pass* "pgpass")
(defparameter *pg-settings* nil "An alist of GUC names and values.")