X-Git-Url: https://git.jsancho.org/?a=blobdiff_plain;f=gacela.lisp;h=73bc8804fe93f710ba689cc39cdf88929189bfa5;hb=3c076309ea8727753bf689c3524d20116f45a0a3;hp=8a1c2c8f598d20fbb2347629594d902350c3e929;hpb=d89eeb0212cedfe8480e080d32db0644dceb7985;p=gacela.git

diff --git a/gacela.lisp b/gacela.lisp
index 8a1c2c8..73bc880 100644
--- a/gacela.lisp
+++ b/gacela.lisp
@@ -266,7 +266,7 @@
     (setq running t)
     (do () ((quit?))
 	(glClear (+ GL_COLOR_BUFFER_BIT GL_DEPTH_BUFFER_BIT))
-	(glLoadIdentity)
+	(to-origin)
 	(when (functionp game-code) (funcall game-code))
 	(SDL_GL_SwapBuffers)
 	(delay-frame)