gered/blarg
Archived
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

update (simplify) view filters. add "is-empty" filter

Browse source
This commit is contained in:
Gered 2013-07-29 22:43:50 -04:00
parent 38c764ef61
commit b583d5f52a
1 changed files with 9 additions and 10 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

19
src/blarg/views/viewfilters.clj
View file

@ -8,25 +8,24 @@
(add-filter!
:md-to-html
(fn [s]
(md/md-to-html-string s)))
#(md/md-to-html-string %))
(add-filter!
:post-url
(fn [post]
(get-post-url post)))
#(get-post-url %))
(add-filter!
:to_relative
(fn [date]
(->relative-timestamp date)))
#(->relative-timestamp %))
(add-filter!
:to_month-day
(fn [date]
(->month-day-str date)))
#(->month-day-str %))
(add-filter!
:to_fulltime
(fn [date]
(clj-time.local/format-local-time date :rfc822)))
#(clj-time.local/format-local-time % :rfc822))
(add-filter!
:is-empty
#(empty? %))