X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=gtk-glext%2Fgtkglext.package.lisp;h=8ce1f759c57a86cc1d907947d078b4852243691d;hb=00346cf6cc21a7a1daa85c3c4bfcac0d86d023b2;hp=5d34a680a02e1449727f137742a96cfeebd1b1f1;hpb=c238d2fffa90c3bdc625b2a3fab05829e5610db1;p=cl-gtk2.git

diff --git a/gtk-glext/gtkglext.package.lisp b/gtk-glext/gtkglext.package.lisp
index 5d34a68..8ce1f75 100644
--- a/gtk-glext/gtkglext.package.lisp
+++ b/gtk-glext/gtkglext.package.lisp
@@ -3,19 +3,21 @@
   (:export #:with-gl-context #:with-matrix-mode
 	   #:gl-drawing-area
            #:gl-drawing-area-on-expose
-           #:gl-drawing-area-on-init))
+           #:gl-drawing-area-on-init
+           #:gl-drawing-area-on-resize))
 
 (in-package :gtkglext)
 
-(eval-when (:compile-toplevel :load-toplevel :execute)
-  (define-foreign-library gtkglext
-    (:unix (:or "libgtkglext-x11-1.0.so.0" "libgtkglext-x11-1.0.so"))
-    (:win32 "libgtkglext-win32-1.0-0.dll")
-    (t (:default "libgtkglext-1.0")))
-  (define-foreign-library gdkglext
-    (:unix (:or "libgdkglext-x11-1.0.so.0" "libgdkglext-x11-1.0.so"))
-    (:win32 "libgtkglext-win32-1.0-0.dll")
-    (t (:default "libgdkglext-1.0"))))
+(at-init ()
+  (eval-when (:compile-toplevel :load-toplevel :execute)
+    (define-foreign-library gtkglext
+      (:unix (:or "libgtkglext-x11-1.0.so.0" "libgtkglext-x11-1.0.so"))
+      (:windows "libgtkglext-win32-1.0-0.dll")
+      (t (:default "libgtkglext-1.0")))
+    (define-foreign-library gdkglext
+      (:unix (:or "libgdkglext-x11-1.0.so.0" "libgdkglext-x11-1.0.so"))
+      (:windows "libgdkglext-win32-1.0-0.dll")
+      (t (:default "libgdkglext-1.0"))))
 
-(use-foreign-library gtkglext)
-(use-foreign-library gdkglext)
+  (use-foreign-library gtkglext)
+  (use-foreign-library gdkglext))