Rename function

This commit is contained in:
oakes
2014-01-11 23:21:56 -05:00
parent ca20e341d8
commit 7ea91ad262

View File

@@ -161,7 +161,7 @@
(add-to-group! [group children])
group)
(defn ^:private init-group
(defn ^:private create-group
[^WidgetGroup group children]
(-> (doto group
(.setFillParent true))
@@ -170,15 +170,15 @@
(defn horizontal*
[children]
(init-group (HorizontalGroup.) children))
(create-group (HorizontalGroup.) children))
(defn vertical*
[children]
(init-group (VerticalGroup.) children))
(create-group (VerticalGroup.) children))
(defn table*
[children]
(init-group (Table.) children))
(create-group (Table.) children))
(defmacro horizontal
[children & options]