X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=generating.lisp;h=885ef965672044b2b39c77098d4c6e5f17127e4e;hb=1be35d7703c593cc41603985d1f7f88dedb6ae67;hp=9e58e084053bdbdd605fd1b36b7a1ff6acbc890e;hpb=24b69c32a97c006993f4fd5b9e2c0c0ceffea89b;p=cl-gtk2.git

diff --git a/generating.lisp b/generating.lisp
index 9e58e08..885ef96 100644
--- a/generating.lisp
+++ b/generating.lisp
@@ -191,6 +191,9 @@
          nil "gtk_menu_tool_button_set_arrow_tooltip_text")
         (:cffi gtk::arrow-tooltip-markup gtk::menu-tool-button-arrow-tooltip-markup :string
          nil "gtk_menu_tool_button_set_arrow_tooltip_markup"))
+       ("GtkRadioButton"
+        (:cffi gtk::group gtk::radio-button-group (gslist gtk::radio-button :free-from-foreign nil :free-to-foreign nil)
+         nil "gtk_radio_button_set_group"))
        ("GtkUIManager"
         (:cffi gtk::accel-group gtk::ui-manager-accel-group g-object
          "gtk_ui_manager_get_accel_group" nil))