remove gl-push-matrix and gl-pop-matrix

* figl/gl.scm: Remove gl-push-matrix and gl-pop-matrix, as there is
  with-gl-push-matrix.

diff --git a/figl/gl.scm b/figl/gl.scm
index ba94f56..6267585 100644 (file)
--- a/figl/gl.scm
+++ b/figl/gl.scm
@@ -156,9 +156,7 @@
            (%glScalef . gl-scale)
            (%glFrustum . gl-frustum)
            (%glOrtho . gl-ortho)
-           (%glActiveTexture . set-gl-active-texture)
-           (%glPushMatrix . gl-push-matrix)
-           (%glPopMatrix . gl-pop-matrix))
+           (%glActiveTexture . set-gl-active-texture))
 
 ;; emacs: (put 'with-gl-push-matrix 'scheme-indent-function 0)
 (define-syntax with-gl-push-matrix