From 5d6ae925f655c3bf813fa25a20032bf6fab00087 Mon Sep 17 00:00:00 2001 Message-Id: <5d6ae925f655c3bf813fa25a20032bf6fab00087.1714778899.git.mdw@distorted.org.uk> From: Mark Wooding Date: Fri, 11 Apr 2008 18:34:02 +0000 Subject: [PATCH] Bug fix Organization: Straylight/Edgeware From: espen --- gtk/gtkaction.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/gtk/gtkaction.lisp b/gtk/gtkaction.lisp index 3124075..7db1f2f 100644 --- a/gtk/gtkaction.lisp +++ b/gtk/gtkaction.lisp @@ -20,7 +20,7 @@ ;; TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE ;; SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. -;; $Id: gtkaction.lisp,v 1.12 2008-03-10 18:51:13 espen Exp $ +;; $Id: gtkaction.lisp,v 1.13 2008-04-11 18:34:02 espen Exp $ (in-package "GTK") @@ -90,7 +90,7 @@ (defbinding %radio-action-get-group () pointer (radio-action radio-action)) (defbinding %radio-action-set-group () nil - (radio-button radio-button) + (radio-action radio-action) (group pointer)) (defmethod add-to-radio-group ((action1 radio-action) (action2 radio-action)) -- [mdw]