Fix print message

This commit is contained in:
oakes
2014-04-01 17:02:50 -04:00
parent 3fde16714f
commit 72bc408bd7

View File

@@ -136,7 +136,7 @@
[parsed-files] [parsed-files]
(let [dir "doc"] (let [dir "doc"]
(.mkdir (io/file dir)) (.mkdir (io/file dir))
(->> parsed-files pr-str (spit (io/file "uberdoc.edn"))) (->> parsed-files pr-str (spit (io/file "doc.edn")))
(html/create dir parsed-files))) (html/create dir parsed-files)))
(defn parse (defn parse
@@ -146,4 +146,4 @@
(apply concat) (apply concat)
parse-clj parse-clj
save) save)
(println "Created uberdoc.html and uberdoc.edn.")) (println "Created doc/ and doc.edn."))