From 8a11479e1b671d256c68cf71d7e4e22971498c8b Mon Sep 17 00:00:00 2001 From: Dmitry Kalyanov Date: Wed, 13 May 2009 15:02:53 +0400 Subject: [PATCH] get-g-flags-definition should call to register-flags-type, not register-enum-type (copy-paste error) --- glib/gobject.generating.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/glib/gobject.generating.lisp b/glib/gobject.generating.lisp index 5fe1cfa..2be3e3c 100644 --- a/glib/gobject.generating.lisp +++ b/glib/gobject.generating.lisp @@ -357,7 +357,7 @@ (defmacro define-g-flags (g-name name (&key (export t) type-initializer) &body values) `(progn (defbitfield ,name ,@values) - (register-enum-type ,g-name ',name) + (register-flags-type ,g-name ',name) ,@(when export (list `(export ',name (find-package ,(package-name (symbol-package name)))))) ,@(when type-initializer -- 1.7.10.4