(no commit message)

[gacela.git] / src / gacela_draw.scm

diff --git a/src/gacela_draw.scm b/src/gacela_draw.scm
index b9a2c5a06967fb679132b5db4ee362be1a7d5f82..8870529138e109113afdf2d59e8842fcc5c7dd5b 100644 (file)
--- a/src/gacela_draw.scm
+++ b/src/gacela_draw.scm
@@ -27,7 +27,7 @@
 
 (define-macro (progn-textures . code)
   `(let ((result #f))
-     (init-gacela)
+     (init-video-mode)
      (glEnable GL_TEXTURE_2D)
      (set! result (begin ,@code))
      (glDisable GL_TEXTURE_2D)
@@ -60,7 +60,7 @@
        (else (glVertex2f x y))))
 
 (define (load-image-for-texture filename)
-  (init-gacela)
+  (init-sdl)
   (let ((image (IMG_Load filename)))
     (cond (image
           (let* ((width (surface-w image)) (height (surface-h image))