Commit a54e173e authored by ryszard.szopa's avatar ryszard.szopa
Browse files

unit-tests: defsuite goes to submarine-tests-package.lisp

parent d0950257
......@@ -3,3 +3,5 @@
(in-package :asdf)
(defpackage :submarine-tests
(:use :cl :submarine :fiveam :iterate))
(in-package :submarine-tests)
(def-suite submarine-tests)
......@@ -35,7 +35,7 @@ metaclass set to HTML and the right connection-spec."
(defmacro defmany (x y)
`(def-many-to-many ,x ,y ("submarine-test" "richard" "dupa" "localhost")))
#.(def-suite submarine-tests)
(in-suite submarine-tests)
(db-test class-connection
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment