 
 (def Site-Config
   {:template s/Keyword
+   (s/optional-key :resources) [s/Str]
    :config
    {(s/optional-key :collections)
     {s/Keyword

         [s/Str Site-Config Tag-Map :- s/Bool]]}
  ([root site-config]
     (copy-resources! root site-config *tag-map*))
  ([root {:keys [template] :as site-config} tag-map]
     (let [template (if (keyword? template) (name template) template)
           resources (template-resources template)
           files (map #(format "%s/%s" template %) resources)]
       (doseq [r resources]
         (let [source (format "%s/%s" template r)

                          content)
                     content)
           target (format "%s/%s" root path)]
       (println (format "writing %s (%s bytes)" target (count content)))
       (spit target content)
       true)))

