clsql/db-postgresql-socket postgresql-socket-api.lisp,1.3,1.4 postgresql-socket-sql.lisp,1.1,1.2

"Kevin M. Rosenberg" <[email protected]> Thu, 1 May 2003 21:05:56 -0600
Newsgroups gmane.lisp.clsql.cvs
Message-ID <[email protected]>
Update of /pubcvs/clsql/db-postgresql-socket
In directory boa.b9.com:/tmp/cvs-serv1523/db-postgresql-socket

Modified Files:
	postgresql-socket-api.lisp postgresql-socket-sql.lisp 
Log Message:


Index: postgresql-socket-api.lisp
===================================================================
RCS file: /pubcvs/clsql/db-postgresql-socket/postgresql-socket-api.lisp,v
retrieving revision 1.3
retrieving revision 1.4
diff -C2 -d -r1.3 -r1.4
*** postgresql-socket-api.lisp	2 Mar 2003 20:02:02 -0000	1.3
--- postgresql-socket-api.lisp	2 May 2003 03:05:54 -0000	1.4
***************
*** 41,50 ****
       (:float8 701)))
  
! (defmethod database-type-library-loaded ((database-type
  					  (eql :postgresql-socket)))
    "T if foreign library was able to be loaded successfully. Always true for
  socket interface"
    t)
! 				      
  
  ;;; Message I/O stuff
--- 41,53 ----
       (:float8 701)))
  
! (defmethod clsql-base-sys:database-type-library-loaded ((database-type
  					  (eql :postgresql-socket)))
    "T if foreign library was able to be loaded successfully. Always true for
  socket interface"
    t)
! 
! (defmethod clsql-base-sys:database-type-load-foreign ((database-type (eql :postgresql-socket)))
!   t)
! 
  
  ;;; Message I/O stuff

Index: postgresql-socket-sql.lisp
===================================================================
RCS file: /pubcvs/clsql/db-postgresql-socket/postgresql-socket-sql.lisp,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** postgresql-socket-sql.lisp	30 Sep 2002 10:19:23 -0000	1.1
--- postgresql-socket-sql.lisp	2 May 2003 03:05:54 -0000	1.2
***************
*** 31,39 ****
  ;; interface foreign library loading routines
  
- (defmethod database-type-library-loaded ((database-type (eql :postgresql-socket)))
-   t)
- 
- (defmethod clsql-base-sys:database-type-load-foreign ((database-type (eql :postgresql-socket)))
-   t)
  
  (clsql-base-sys:database-type-load-foreign :postgresql-socket)
--- 31,34 ----