          opts (if (= (:platform opts) :jetty)
                 (merge opts {:ring true, :ringx true})
                 opts)
-log (println (str "OPTS: " opts))
          opts (let [ns (get-in opts [:ns :sym])]
                 (into opts {:ns {:sym (symbol (str (when ns (str ns ".")) project))
                                    :prefix (get-in opts [:ns :prefix])

      ;; (pp/pprint templates)
      ;; (log/info "RAW:")
      ;; (pp/pprint raw)
      (apply ->filesx spec raw))))

(defn- vet-demo
  [args]

  [name & [render-fn]]
  (let [render (or render-fn render-text)]
    (fn [template & [data]]
      ;; (println "rendering " template) ;; " data: " data)
      (let [path (string/join "/" ["leiningen" "new" (sanitize name) template])]
        ;; (println "rendering " path)
        (if-let [resource (io/resource path)]
          (if data
            (render (slurp-resource resource) data)
