Reverted previous change

diff --git a/gdk/gdktypes.lisp b/gdk/gdktypes.lisp
index 1168b55cad2a108d6f6ca146a86152b6e992b258..8564ad26595fef11fad550656a087c65f8475330 100644 (file)
--- a/gdk/gdktypes.lisp
+++ b/gdk/gdktypes.lisp
@@ -15,14 +15,14 @@
 ;; License along with this library; if not, write to the Free Software
 ;; Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 
 ;; 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: gdktypes.lisp,v 1.17 2005-03-11 10:56:56 espen Exp $
+;; $Id: gdktypes.lisp,v 1.18 2005-03-11 16:48:08 espen Exp $

 
 (in-package "GDK")
 
 (eval-when (:compile-toplevel :load-toplevel :execute)
   (init-types-in-library #.(concatenate 'string
                            (pkg-config:pkg-variable "gtk+-2.0" "libdir")
 
 (in-package "GDK")
 
 (eval-when (:compile-toplevel :load-toplevel :execute)
   (init-types-in-library #.(concatenate 'string
                            (pkg-config:pkg-variable "gtk+-2.0" "libdir")

-                           "/libgdk-x11-2.0.so") :prefix "gdk_")
+                           "/libgdk-x11-2.0.so") :prefix ("gdk_" "_gdk_"))

   (init-types-in-library #.(concatenate 'string
                            (pkg-config:pkg-variable "gtk+-2.0" "libdir")
                            "/libgdk_pixbuf-2.0.so") :prefix "gdk_"))
   (init-types-in-library #.(concatenate 'string
                            (pkg-config:pkg-variable "gtk+-2.0" "libdir")
                            "/libgdk_pixbuf-2.0.so") :prefix "gdk_"))

diff --git a/gtk/gtkobject.lisp b/gtk/gtkobject.lisp
index 6da0c487ebe666dc86cd4e169c4b5865e23eb0bc..64ac20401a4f9d0cde05b3cc4809b620822ea95e 100644 (file)
--- a/gtk/gtkobject.lisp
+++ b/gtk/gtkobject.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
 
 ;; 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: gtkobject.lisp,v 1.25 2005-03-11 10:58:41 espen Exp $
+;; $Id: gtkobject.lisp,v 1.26 2005-03-11 16:48:15 espen Exp $

 
 
 (in-package "GTK")
 
 
 (in-package "GTK")


@@ -36,7 +36,7 @@ (in-package "GTK")
 (eval-when (:compile-toplevel :load-toplevel :execute)
   (init-types-in-library 
    #.(concatenate 'string (pkg-config:pkg-variable "gtk+-2.0" "libdir") 
 (eval-when (:compile-toplevel :load-toplevel :execute)
   (init-types-in-library 
    #.(concatenate 'string (pkg-config:pkg-variable "gtk+-2.0" "libdir") 

-                         "/libgtk-x11-2.0.so") :prefix "gtk_")
+                         "/libgtk-x11-2.0.so"))

 
   (defclass %object (gobject)
     ()
 
   (defclass %object (gobject)
     ()