From bfac2618ac9343768ab56d5c47ab788b641f682a Mon Sep 17 00:00:00 2001
From: Andy Wingo <wingo@pobox.com>
Date: Tue, 12 Feb 2013 12:04:52 +0100
Subject: [PATCH] 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.
---
 figl/gl.scm | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/figl/gl.scm b/figl/gl.scm
index ba94f56..6267585 100644
--- 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
-- 
2.20.1