split up JtwigModelMap creation from JtwigContext creation
This commit is contained in:
parent
cfa047ad18
commit
0f450b36b3
|
@ -54,13 +54,18 @@
|
||||||
(.getContextClassLoader)
|
(.getContextClassLoader)
|
||||||
(.getResource filename)))
|
(.getResource filename)))
|
||||||
|
|
||||||
(defn- make-context [model-map {:keys [skip-model-map-stringify?] :as options}]
|
(defn- make-model-map [model-map-values {:keys [skip-model-map-stringify?] :as options}]
|
||||||
(let [context (new JtwigContext (new JtwigModelMap) @functions)]
|
(let [model-map-obj (new JtwigModelMap)
|
||||||
(doseq [[k v] (if-not skip-model-map-stringify?
|
values (if-not skip-model-map-stringify?
|
||||||
(stringify-keys model-map)
|
(stringify-keys model-map-values)
|
||||||
model-map)]
|
model-map-values)]
|
||||||
(.set context k v))
|
(doseq [[k v] values]
|
||||||
context))
|
(.add model-map-obj k v))
|
||||||
|
model-map-obj))
|
||||||
|
|
||||||
|
(defn- make-context [model-map options]
|
||||||
|
(let [model-map-obj (make-model-map model-map options)]
|
||||||
|
(new JtwigContext model-map-obj @functions)))
|
||||||
|
|
||||||
(defn- render-template
|
(defn- render-template
|
||||||
[template model-map & [options]]
|
[template model-map & [options]]
|
||||||
|
|
Reference in a new issue