Bug fix

[clg] / glib / export.lisp

diff --git a/glib/export.lisp b/glib/export.lisp
index 4ac86e4c2537c65e91cbf29cf5983eda670139d4..478936b7f6be2ee5802f10bcf10ca0b4255f654a 100644 (file)
--- a/glib/export.lisp
+++ b/glib/export.lisp
@@ -15,7 +15,7 @@
 ;; License along with this library; if not, write to the Free Software
 ;; Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 
-;; $Id: export.lisp,v 1.1 2004-10-27 14:48:49 espen Exp $
+;; $Id: export.lisp,v 1.4 2005-02-14 00:40:38 espen Exp $
 
 
 ;;; Autogenerating exported symbols
@@ -29,15 +29,23 @@   (defexport defbinding (name &rest args)
        name
       (first name)))
 
-  (defexport define-type-method-fun (name lambda-list)
-    (declare (ignore lambda-list))
+  (defexport def-type-method (name &rest args)
+    (declare (ignore args))
+    name)
+
+  (defexport define-enum-type (name &rest args)
+    (declare (ignore args))
+    name)
+
+  (defexport define-flags-type (name &rest args)
+    (declare (ignore args))
     name)
 
   (defexport define-types-by-introspection (prefix &rest args)
     (list-autoexported-symbols (expand-type-definitions prefix args))))
   
 
-(export-from-file #p"clg:glib;gutils.lisp")
+(export-from-file #p"clg:glib;utils.lisp")
 (export-from-file #p"clg:glib;glib.lisp")
 (export-from-file #p"clg:glib;proxy.lisp")
 (export-from-file #p"clg:glib;gboxed.lisp")
@@ -47,3 +55,4 @@ (export-from-file #p"clg:glib;gcallback.lisp")
 (export-from-file #p"clg:glib;ginterface.lisp")
 (export-from-file #p"clg:glib;gobject.lisp")
 (export-from-file #p"clg:glib;genums.lisp")
+(export-from-file #p"clg:glib;gerror.lisp")