X-Git-Url: http://git.kpe.io/?a=blobdiff_plain;f=tests%2Ftest-init.lisp;h=7a46089b16b820e7fab2420dd393dff3d5fe8b3f;hb=799820388d21ad2d81502816025fdc6f89f71bf2;hp=500b89852125ee48a8af06f7882317f69741a313;hpb=90ce2284fab5f1daedb8aa6aba3008a5c3651e30;p=clsql.git

diff --git a/tests/test-init.lisp b/tests/test-init.lisp
index 500b898..7a46089 100644
--- a/tests/test-init.lisp
+++ b/tests/test-init.lisp
@@ -183,6 +183,9 @@
                                *rt-ooddl* *rt-oodml* *rt-syntax*))
       (let ((test (second test-form)))
         (cond
+	  ((and (not (eql db-underlying-type :mysql))
+		(clsql-sys:in test :connection/query-command))
+	   (push (cons test "Known to only work in mysql as yet.") skip-tests))
           ((and (null (clsql-sys:db-type-has-views? db-underlying-type))
                 (clsql-sys:in test :fddl/view/1 :fddl/view/2 :fddl/view/3 :fddl/view/4))
            (push (cons test "views not supported.") skip-tests))