gered/clj-pebble
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

add support for adding custom template filters

Browse source
This commit is contained in:
Gered 2014-10-05 15:25:23 -04:00
parent 550550a210
commit bf68239b90
1 changed files with 12 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

13
src/clj_pebble/core.clj
View file

@ -4,7 +4,7 @@
(com.mitchellbosecke.pebble PebbleEngine) (com.mitchellbosecke.pebble PebbleEngine)
(com.mitchellbosecke.pebble.loader ClasspathLoader FileLoader StringLoader) (com.mitchellbosecke.pebble.loader ClasspathLoader FileLoader StringLoader)
(com.mitchellbosecke.pebble.template PebbleTemplate) (com.mitchellbosecke.pebble.template PebbleTemplate)
(com.mitchellbosecke.pebble.extension Function)) (com.mitchellbosecke.pebble.extension Function Filter))
(:require [clojure.walk :refer [stringify-keys]])) (:require [clojure.walk :refer [stringify-keys]]))
(defonce classpath-loader (ClasspathLoader.)) (defonce classpath-loader (ClasspathLoader.))
@ -33,11 +33,22 @@
(execute [_ args] (execute [_ args]
(apply f (get-sorted-args args))))) (apply f (get-sorted-args args)))))
(defn make-filter [f]
(reify Filter
(getArgumentNames [_] nil)
(apply [_ input args]
(apply f (concat [input] (get-sorted-args args))))))
(defmacro defpebblefn [fn-name args & body] (defmacro defpebblefn [fn-name args & body]
`(let [f# (fn ~args ~@body) `(let [f# (fn ~args ~@body)
pebble-fn# (make-function f#)] pebble-fn# (make-function f#)]
(.put (.getFunctions @engine) ~fn-name pebble-fn#))) (.put (.getFunctions @engine) ~fn-name pebble-fn#)))
(defmacro defpebblefilter [filter-name args & body]
`(let [f# (fn ~args ~@body)
pebble-fn# (make-filter f#)]
(.put (.getFilters @engine) ~filter-name pebble-fn#)))
(defn- prepare-context-map [context] (defn- prepare-context-map [context]
(if context (if context
(stringify-keys context) (stringify-keys context)