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

Use the current year for the README

Browse source
This commit is contained in:
Joe Gallo 2011-01-12 18:30:20 -05:00
parent f95b4b1e12
commit 26bdace257
1 changed files with 6 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

8
src/leiningen/new.clj
View file

@ -2,7 +2,8 @@
"Create a new project skeleton." "Create a new project skeleton."
(:use [leiningen.core :only [ns->path]] (:use [leiningen.core :only [ns->path]]
[clojure.java.io :only [file]] [clojure.java.io :only [file]]
[clojure.string :only [join]])) [clojure.string :only [join]])
(:import (java.util Calendar)))
(defn write-project [project-dir project-name] (defn write-project [project-dir project-name]
(.mkdirs (file project-dir)) (.mkdirs (file project-dir))
@ -26,12 +27,15 @@
"(deftest replace-me ;; FIXME: write\n (is false " "(deftest replace-me ;; FIXME: write\n (is false "
"\"No tests have been written.\"))\n"))) "\"No tests have been written.\"))\n")))
(defn- year []
(.get (Calendar/getInstance) Calendar/YEAR))
(defn write-readme [project-dir artifact-id] (defn write-readme [project-dir artifact-id]
(spit (file project-dir "README") (spit (file project-dir "README")
(join "\n\n" [(str "# " artifact-id) (join "\n\n" [(str "# " artifact-id)
"FIXME: write description" "FIXME: write description"
"## Usage" "FIXME: write" "## Usage" "FIXME: write"
"## License" "Copyright (C) 2010 FIXME" "## License" (str "Copyright (C) " (year) " FIXME")
(str "Distributed under the Eclipse Public" (str "Distributed under the Eclipse Public"
" License, the same as Clojure.\n")]))) " License, the same as Clojure.\n")])))