yogsototh/leiningen
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Don't include all of user-settings in new project.clj files.

Browse source
This commit is contained in:
Phil Hagelberg 2011-08-07 14:09:42 -07:00
parent 61cbfc6162
commit 8b808a79a3
1 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
src/leiningen/new.clj
View file

@ -1,6 +1,6 @@
(ns leiningen.new
"Create a new project skeleton."
(:use [leiningen.core :only [abort user-settings]]
(:use [leiningen.core :only [abort]]
[leiningen.util.paths :only [ns->path]]
[clojure.java.io :only [file]]
[clojure.string :only [join]])
@ -18,8 +18,7 @@
(defn write-project [project-dir project-name]
(let [default-settings {:dependencies [['org.clojure/clojure "1.2.1"]]}
settings (merge-with #(if %2 %2 %1)
default-settings
(user-settings))]
default-settings)]
(.mkdirs (file project-dir))
(spit (file project-dir "project.clj")
(str "(defproject " project-name " \"1.0.0-SNAPSHOT\"\n"
@ -83,4 +82,5 @@
(write-implementation project-dir project-clj project-ns)
(write-test project-dir test-ns project-ns)
(write-readme project-dir artifact-id)
(println "Created new project in:" project-dir)))))
(println "Created new project in:" project-dir)
(println "Look over project.clj and start coding in" project-clj)))))