   {:path (relative-path (.getPath file))
    :mod-time (fs/mod-time file)})
 
-(defn meta-section
+(defn get-page-info
   [lines]
-  (->> lines (take-while #(not= % *meta-sep*))))
+  (->> lines (take-while #(not= % *meta-sep*)) (join "\n") (read-string)))
 
 (defn content-section
   [lines]

            (doall
             (for [file (->> (fs/file ".") (file-seq) (filter content-file?))]
               (with-open [reader (clojure.java.io/reader file)]
                 [(get-file-info file)
                  (->> (meta-section (line-seq reader))
                       (join "\n")
                       (read-string))]))))))

(defn strip-extension
  [s]

(def ^:dynamic site nil)

(def ^:dynamic *meta-sep*  "===")

(defn relative-path
  [path]
