added :draft? key to allow creation of draft posts that won't be published

This commit is contained in:
Yogthos 2015-12-17 14:36:09 -05:00
parent 2eb469ee3f
commit 5b13b3b761
2 changed files with 5 additions and 4 deletions

View file

@ -1,4 +1,4 @@
(defproject cryogen-core "0.1.26" (defproject cryogen-core "0.1.27"
:description "Cryogen's compiler" :description "Cryogen's compiler"
:url "https://github.com/cryogen-project/cryogen-core" :url "https://github.com/cryogen-project/cryogen-core"
:license {:name "Eclipse Public License" :license {:name "Eclipse Public License"
@ -9,8 +9,8 @@
[crouton "0.1.2"] [crouton "0.1.2"]
[cheshire "5.5.0"] [cheshire "5.5.0"]
[clj-text-decoration "0.0.3"] [clj-text-decoration "0.0.3"]
[io.aviso/pretty "0.1.19"] [io.aviso/pretty "0.1.20"]
[hiccup "1.0.5"] [hiccup "1.0.5"]
[selmer "0.9.3"] [selmer "0.9.5"]
[pandect "0.5.4"] [pandect "0.5.4"]
[clj-tagsoup "0.3.0" :exclusions [org.clojure/clojure]]]) [clj-tagsoup "0.3.0" :exclusions [org.clojure/clojure]]])

View file

@ -123,7 +123,8 @@
(fn [mu] (fn [mu]
(->> (->>
(find-posts config mu) (find-posts config mu)
(pmap #(parse-post % config mu)))) (pmap #(parse-post % config mu))
(remove #(= (:draft? %) true))))
(m/markups)) (m/markups))
(sort-by :date) (sort-by :date)
reverse)) reverse))