From 9c36a8241866fb5ffba6ff06defe5ea4b17ac233 Mon Sep 17 00:00:00 2001 From: satchit8 Date: Fri, 18 Nov 2016 13:04:12 +0000 Subject: [PATCH] Remove spurious let --- src/clojure/neko/ui/mapping.clj | 25 ++++++++++++------------- 1 file changed, 12 insertions(+), 13 deletions(-) diff --git a/src/clojure/neko/ui/mapping.clj b/src/clojure/neko/ui/mapping.clj index 671227e..fa13d50 100644 --- a/src/clojure/neko/ui/mapping.clj +++ b/src/clojure/neko/ui/mapping.clj @@ -172,19 +172,18 @@ keyword can be extracted from :value-namespaces map for element's mapping." [element-kw value & [attribute]] - (let [mapping @keyword-mapping] - (if-not (keyword? value) - (cond - (integer? value) (int value) - (float? value) (float value) - :else value) - (or (recursive-find (list element-kw :values value)) - (reflect-field - (classname - (or (and attribute - (recursive-find [element-kw :value-namespaces attribute])) - element-kw)) - (keyword->static-field value)))))) + (if-not (keyword? value) + (cond + (integer? value) (int value) + (float? value) (float value) + :else value) + (or (recursive-find (list element-kw :values value)) + (reflect-field + (classname + (or (and attribute + (recursive-find [element-kw :value-namespaces attribute])) + element-kw)) + (keyword->static-field value))))) (defn add-default-atribute-value! "Adds a default attribute value for the given element."