X-Git-Url: http://git.kpe.io/?p=clsql.git;a=blobdiff_plain;f=db-postgresql-socket%2Fpostgresql-socket-sql.lisp;fp=db-postgresql-socket%2Fpostgresql-socket-sql.lisp;h=6a45589f1b9c2f28b61c02324c11c4d9e5cd84ce;hp=d988edaffaf6485572beefa5e914528732d486bd;hb=dd0b244d779d96f80e262e02ce4d2f793888b79f;hpb=cff8a2497b3f111a43d819476b55bfad2b447532

diff --git a/db-postgresql-socket/postgresql-socket-sql.lisp b/db-postgresql-socket/postgresql-socket-sql.lisp
index d988eda..6a45589 100644
--- a/db-postgresql-socket/postgresql-socket-sql.lisp
+++ b/db-postgresql-socket/postgresql-socket-sql.lisp
@@ -325,8 +325,7 @@ doesn't depend on UFFI."
     (format nil " AND (NOT (relowner=1))"))
    (t "")))
 
-(defmethod database-list-objects-of-type ((database postgresql-socket-database)
-                                          type owner)
+(defun database-list-objects-of-type (database type owner)
   (mapcar #'car
 	  (database-query
 	   (format nil