gtk-glext: workaround for cl-glut not reinitializaing on image restart

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

diff --git a/gtk-glext/gtkglext.lisp b/gtk-glext/gtkglext.lisp
index 5cbb241..682d5d4 100644 (file)
--- a/gtk-glext/gtkglext.lisp
+++ b/gtk-glext/gtkglext.lisp
@@ -11,6 +11,7 @@
   (glut:init))
 
 (at-init () (gl-init))
+(at-finalize () (setf cl-glut::*glut-initialized-p* nil))
 
 ;; Query