From 7ea91ad262115f9b9ee410dbf2b288ff36c1fdee Mon Sep 17 00:00:00 2001 From: oakes Date: Sat, 11 Jan 2014 23:21:56 -0500 Subject: [PATCH] Rename function --- src/play_clj/ui.clj | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/src/play_clj/ui.clj b/src/play_clj/ui.clj index 5150ebb..5c59858 100644 --- a/src/play_clj/ui.clj +++ b/src/play_clj/ui.clj @@ -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]