From 53e2f4aeaeb8a3ff843e5438472227d15caf1f09 Mon Sep 17 00:00:00 2001 From: "Kevin M. Rosenberg" Date: Sun, 11 Apr 2004 10:29:41 +0000 Subject: [PATCH] r8944: fix type --- db-mysql/mysql-sql.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/db-mysql/mysql-sql.lisp b/db-mysql/mysql-sql.lisp index 87b78f3..c3bbda1 100644 --- a/db-mysql/mysql-sql.lisp +++ b/db-mysql/mysql-sql.lisp @@ -412,7 +412,7 @@ (format nil "database-create failed: ~A" output)) t)))) -(defmethod database-destory (connection-spec (type (eql :mysql))) +(defmethod database-destroy (connection-spec (type (eql :mysql))) (destructuring-bind (host name user password) connection-spec (multiple-value-bind (output status) (clsql-base-sys:command-output "mysqladmin drop -u~A -p~A -h~A ~A" -- 2.34.1