X-Git-Url: http://git.kpe.io/?p=clsql.git;a=blobdiff_plain;f=base%2Fdb-interface.lisp;h=fa07af92eddbd39c67e9cc0ae19a232a4edf6374;hp=b2ba6e5533a1f20735a017757d517dd85553b7a7;hb=7fd52b8de887a2a328f78bddb6a2fb4230ef2b3a;hpb=3e67ee0887558908069b0d1f2a72abfae3725799

diff --git a/base/db-interface.lisp b/base/db-interface.lisp
index b2ba6e5..fa07af9 100644
--- a/base/db-interface.lisp
+++ b/base/db-interface.lisp
@@ -118,9 +118,6 @@ returns nil when result-set is finished."))
 if not found. May signal an error if unable to communicate with database server."))
 
 (defgeneric database-destroy (connection-spec database)
-  (:method (connection-spec (database t))
-	   (declare (ignore connection-spec))
-	   (signal-no-database-error database))
   (:documentation "Destroys (drops) a database."))
 
 (defgeneric database-truncate (database)