0.1.0-SNAPSHOT Arrow_down_16x16

icon-setters

clj-swing.core

  • (icon-setters names opts)

0 Examples top

Log in to add / edit an example.

See Also top

Log in to add a see also.

Plus_12x12 Minus_12x12 Source clj_swing/core.clj:33 top

(defn icon-setters [names opts]
  (if opts
    (remove 
     nil?
     (map
      (fn [name] 
	(when-let [icon (opts name)] 
	  `(.  ~(kw-to-setter name) (.getImage (ImageIcon. ~icon))))) names))))
Vars in clj-swing.core/icon-setters: defn fn map name nil? remove when-let concat list seq
Used in 0 other vars

Comments top

No comments for icon-setters. Log in to add a comment.