From 1de07c9e457ef4bcab403141056ab431e7a3952a Mon Sep 17 00:00:00 2001 From: Phil Hagelberg Date: Thu, 13 Jan 2011 15:27:11 -0500 Subject: [PATCH] Reload tests in interactive mode. --- src/leiningen/repl.clj | 1 + src/leiningen/test.clj | 2 +- 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/src/leiningen/repl.clj b/src/leiningen/repl.clj index dab95d12..9d8bd075 100644 --- a/src/leiningen/repl.clj +++ b/src/leiningen/repl.clj @@ -102,6 +102,7 @@ on a socket based on the :repl-port key in project.clj or chosen randomly. Running outside a project directory will start a standalone repl session." ([] (repl {})) ([project] + ;; TODO: don't start socket server until deps (let [[port host] (repl-socket-on project) server-form (apply repl-server project host port (:repl-options project)) diff --git a/src/leiningen/test.clj b/src/leiningen/test.clj index 0fa36588..7856590a 100644 --- a/src/leiningen/test.clj +++ b/src/leiningen/test.clj @@ -24,7 +24,7 @@ each namespace and print an overall summary." ([namespaces result-file & [selectors]] `(do (doseq [n# '~namespaces] - (require n#)) + (require n# :reload)) ~(form-for-hook-selectors selectors) (let [summary# (binding [clojure.test/*test-out* *out*] (apply ~'clojure.test/run-tests '~namespaces))]