Don't invoke select-keys on post in create-preview
This allows preview templates to access all of post's metadata.
This commit is contained in:
parent
933d213d15
commit
f6a7d17213
1 changed files with 1 additions and 1 deletions
|
@ -255,7 +255,7 @@
|
|||
(defn create-preview
|
||||
"Creates a single post preview"
|
||||
[blocks-per-preview post]
|
||||
(merge (select-keys post [:title :author :date :uri])
|
||||
(merge post
|
||||
{:content (or (content-until-more-marker (:content post))
|
||||
(->> ((tagsoup/parse-string (:content post)) 2)
|
||||
(drop 2)
|
||||
|
|
Loading…
Reference in a new issue