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

diff --git a/gtk-glext/gtkglext.package.lisp b/gtk-glext/gtkglext.package.lisp
old mode 100755
new mode 100644
index 6f870bd..8ce1f75
--- a/gtk-glext/gtkglext.package.lisp
+++ b/gtk-glext/gtkglext.package.lisp
@@ -8,15 +8,16 @@
 
 (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"))
-    (: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"))))
+(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))