Ensure that foreign libraries are defined and loaded at image startup

[cl-gtk2.git] / gtk-glext / gtkglext.package.lisp

diff --git a/gtk-glext/gtkglext.package.lisp b/gtk-glext/gtkglext.package.lisp
index 6f870bd..8ce1f75 100755 (executable)
--- 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))