     value
     (or (-> @keyword-mapping element-kw :values value)
         (symbol (str (.getName (classname element-kw)) \/ (kw-to-static-field value))))))
-      
+
 ;; These would be moved somewhere at some point.
 ;;
 (do

                            (attribute-value el-type value)
                            value)]
           `(~(symbol (str ".set" (capitalize (name attr)))) ~obj ~real-value)))
         attributes))

(defn process-attributes
  "Takes an UI element type, its object symbol and a map of


Taken from clj-android by remvee."
  ([width height weight]
     (let [real-width (attribute-value :layout-params (or width :wrap))
           real-height (attribute-value :layout-params (or height :wrap))
           real-weight (or weight 0)]
       `(new LinearLayout$LayoutParams ~real-width ~real-height ~real-weight))))

(defmethod transform-attributes :layout-params [el-type obj attributes
                                                generated-code]
