From 74547696b03bf1a1b7f30e6f0b93b152f5ff1352 Mon Sep 17 00:00:00 2001
From: glynnm <glynn@aptproducts.com>
Date: Sat, 4 Sep 2010 00:50:52 +0800
Subject: [PATCH] Fix for :repl-init-script. Change (File. str) to (File. (str
 is#))

---
 src/leiningen/repl.clj | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/leiningen/repl.clj b/src/leiningen/repl.clj
index 171f5bdf..faae7338 100644
--- a/src/leiningen/repl.clj
+++ b/src/leiningen/repl.clj
@@ -9,7 +9,7 @@
 (defn repl-server [project host port]
   (let [init-form [:init `#(let [is# ~(:repl-init-script project)
                                  mn# '~(:main project)]
-                             (when (and is# (.exists (File. str)))
+                             (when (and is# (.exists (File. (str is#))))
                                (load-file is#))
                              (if mn#
                                (doto mn# require in-ns)