r8949: non-interactive removal

diff --git a/db-mysql/mysql-sql.lisp b/db-mysql/mysql-sql.lisp
index c3bbda1dff00b17da06de53ba52209cebb81290d..2a0ba822ba9d17e7a95c6981f12595122502571d 100644 (file)
--- a/db-mysql/mysql-sql.lisp
+++ b/db-mysql/mysql-sql.lisp
@@ -415,7 +415,7 @@
 (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"
+       (clsql-base-sys:command-output "mysqladmin drop -f -u~A -p~A -h~A ~A"
                                       user password 
                                       (if host host "localhost")
                                       name)