   "Returns an entity based on [Tree](http://libgdx.badlogicgames.com/nightlies/docs/api/com/badlogic/gdx/scenes/scene2d/ui/Tree.html).
 
     (tree [entity-1 entity-2] (style :tree plus minus selection))
+    (tree [entity-1 entity-2] (style :tree nil nil nil))
     (tree [entity-1 entity-2] (skin \"uiskin.json\"))"
   [children arg & options]
   `(let [entity# (tree* ~children ~arg)]

  "Returns an entity based on [TextButton](http://libgdx.badlogicgames.com/nightlies/docs/api/com/badlogic/gdx/scenes/scene2d/ui/TextButton.html).

    (text-button \"I'm a text button\" (style :text-button up dn checked font))
    (text-button \"I'm a text button\" (skin \"uiskin.json\"))"
  [text arg & options]
  `(let [entity# (text-button* ~text ~arg)]

  "Returns an entity based on [SelectBox](http://libgdx.badlogicgames.com/nightlies/docs/api/com/badlogic/gdx/scenes/scene2d/ui/SelectBox.html).

    (select-box (style :select-box font color back scroll-style list-style)
                :set-items (into-array [\"Item 1\" \"Item 2\" \"Item 3\"]))
    (select-box (style :select-box (bitmap-font) (color :white) nil
                       (style :scroll-pane nil nil nil nil nil)
                       (style :list (bitmap-font) (color :white) (color :black) nil))
                :set-items (into-array [\"Item 1\" \"Item 2\" \"Item 3\"]))
    (select-box (skin \"uiskin.json\")
                :set-items (into-array [\"Item 1\" \"Item 2\" \"Item 3\"]))"
