Make add! nicer to use directly
This commit is contained in:
@@ -104,16 +104,14 @@
|
|||||||
nil)))
|
nil)))
|
||||||
|
|
||||||
(defn add!
|
(defn add!
|
||||||
[group children]
|
[group & children]
|
||||||
(doseq [child children]
|
(doseq [child children]
|
||||||
(add-to-group! [group child]))
|
(add-to-group! [group child]))
|
||||||
group)
|
group)
|
||||||
|
|
||||||
(defn ^:private create-group
|
(defn ^:private create-group
|
||||||
[^WidgetGroup group children]
|
[^WidgetGroup group children]
|
||||||
(-> group
|
(apply add! (u/create-entity group) children))
|
||||||
u/create-entity
|
|
||||||
(add! children)))
|
|
||||||
|
|
||||||
; widgets
|
; widgets
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user