test.el

(defvar clj-last-test "user")

(defun clj-run-tests (run-last)                                                                                                                              
  (interactive "P")
  (monroe-send-eval-string
   (format "%s" `(circleci.test/run-tests
                  (quote ,(if run-last
                              clj-last-test
                            (setq clj-last-test (clojure-find-ns))))))
   (monroe-make-response-handler)))

(eval-after-load 'clojure-mode
  '(define-key clojure-mode-map (kbd "C-c C-t") 'clj-run-tests))