Package fixes.

diff --git a/cl-mock.asd b/cl-mock.asd
index 7b71beb..6fc2a3c 100644 (file)
--- a/cl-mock.asd
+++ b/cl-mock.asd
@@ -10,7 +10,7 @@ version)."
   :license "Simplified BSD License"
   :version "1.0.0"
   #+asdf-unicode :encoding #+asdf-unicode :utf-8
-  :depends-on (#:cl-mock-basic #:closer-mop #:alexandria #:optima)
+  :depends-on (#:cl-mock-basic #:optima)
   :in-order-to ((asdf:test-op (asdf:load-op #:cl-mock-tests)))
   :perform (asdf:test-op :after (op c)
              (funcall (find-symbol (symbol-name '#:run!) '#:fiveam)

diff --git a/src/facade.lisp b/src/facade.lisp
index a16e88f..4ad42fd 100644 (file)
--- a/src/facade.lisp
+++ b/src/facade.lisp
@@ -25,7 +25,7 @@
                             for (form . rest) on forms
                             collect `(,(if rest i T) ,form)))))
                (if (listp call)
-                   `(match args
+                   `(optima:match args
                      ((list . ,(cdr call)) ,cases)
                      (_ (unhandled)))
                    cases))))))))

diff --git a/src/package.lisp b/src/package.lisp
index 8f802ae..e2725b3 100644 (file)
--- a/src/package.lisp
+++ b/src/package.lisp
@@ -3,7 +3,7 @@
 (in-package #:cl-user)
 \f
 (defpackage #:cl-mock
-  (:use #:closer-common-lisp #:alexandria #:optima)
+  (:use #:closer-common-lisp #:alexandria)
   (:export
    ;; regular functions
    #:maybe-fdefinition