clsql/db-postgresql postgresql-sql.lisp,1.2,1.3

Update of /pubcvs/clsql/db-postgresql
In directory boa.b9.com:/tmp/cvs-serv3800/db-postgresql

Modified Files:
	postgresql-sql.lisp 
Log Message:


Index: postgresql-sql.lisp
===================================================================
RCS file: /pubcvs/clsql/db-postgresql/postgresql-sql.lisp,v
retrieving revision 1.2
retrieving revision 1.3
diff -C2 -d -r1.2 -r1.3
*** postgresql-sql.lisp	23 Jun 2003 19:25:30 -0000	1.2
--- postgresql-sql.lisp	21 Jul 2003 01:45:45 -0000	1.3
***************
*** 3,7 ****
  ;;;; FILE IDENTIFICATION
  ;;;;
! ;;;; Name:          postgresql-sql.sql
  ;;;; Purpose:       High-level PostgreSQL interface using UFFI
  ;;;; Programmers:   Kevin M. Rosenberg based on
--- 3,7 ----
  ;;;; FILE IDENTIFICATION
  ;;;;
! ;;;; Name:          postgresql-sql.lisp
  ;;;; Purpose:       High-level PostgreSQL interface using UFFI
  ;;;; Programmers:   Kevin M. Rosenberg based on
***************
*** 354,357 ****
  
  (when (clsql-base-sys:database-type-library-loaded :postgresql)
!   (clsql-base-sys:initialize-database-type :database-type :postgresql)
!   (pushnew :postgresql cl:*features*))
--- 354,356 ----
  
  (when (clsql-base-sys:database-type-library-loaded :postgresql)
!   (clsql-base-sys:initialize-database-type :database-type :postgresql))