document 'lein new template flibbertigibbet'
[flibbertigibbet] / src / leiningen / new / flibbertigibbet.clj
CommitLineData
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
8 "FIXME: write documentation"
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)])))