Remove deprecated :repl-init-script.
This commit is contained in:
parent
c0adabb208
commit
f8708a445d
3 changed files with 5 additions and 14 deletions
4
.gitignore
vendored
4
.gitignore
vendored
|
@ -1,6 +1,4 @@
|
|||
test_projects/*/lib
|
||||
test_projects/*/classes/
|
||||
test_projects/*/nomnomnom*.jar
|
||||
test_projects/*/target
|
||||
test_projects/sample/pom.xml
|
||||
classes/
|
||||
lib/
|
||||
|
|
|
@ -14,6 +14,6 @@ Raise an exception if any deletion fails unless silently is true."
|
|||
(delete-file f silently)))
|
||||
|
||||
(defn clean
|
||||
"Remove all files from project's target-dir."
|
||||
"Remove all files from project's target-path."
|
||||
[project]
|
||||
(delete-file-recursively (:target-path project) :silently))
|
||||
|
|
|
@ -14,18 +14,11 @@
|
|||
|
||||
(defn repl-options [project options]
|
||||
(let [options (apply hash-map options)
|
||||
init `#(let [is# ~(:repl-init-script project)
|
||||
in# '~(:repl-init project)
|
||||
init `#(let [in# '~(:repl-init project)
|
||||
mn# '~(:main project)]
|
||||
~(:init options)
|
||||
(when (and is# (.exists (File. (str is#))))
|
||||
(println (str "Warning: :repl-init-script is "
|
||||
"deprecated; use :repl-init."))
|
||||
(load-file is#))
|
||||
(when in#
|
||||
(require in#))
|
||||
(when mn#
|
||||
(require mn#))
|
||||
(when in# (require in#))
|
||||
(when mn# (require mn#))
|
||||
(in-ns (or in# mn# '~'user)))
|
||||
;; Suppress socket closed since it's part of normal operation
|
||||
caught `(fn [t#]
|
||||
|
|
Loading…
Reference in a new issue