Commit | Line | Data |
---|---|---|
70ffdd86 | 1 | (ns leiningen.new.flibbertigibbet |
2 | (:require [leiningen.new.templates :refer [renderer name-to-path ->files]] | |
3 | [leiningen.core.main :as main])) | |
4 | ||
5 | (def render (renderer "flibbertigibbet")) | |
6 | ||
7 | (defn flibbertigibbet | |
8a43ca7e | 8 | "create new clojure projects" |
70ffdd86 | 9 | [name] |
10 | (let [data {:name name | |
11 | :sanitized (name-to-path name)}] | |
12 | (main/info "Generating fresh 'lein new' flibbertigibbet project.") | |
13 | (->files data | |
14 | ["src/{{sanitized}}/foo.clj" (render "foo.clj" data)]))) |