(no commit message)

[gacela.git] / gacela_draw.lisp

diff --git a/gacela_draw.lisp b/gacela_draw.lisp
index a66adf9c34f74685d8231d08113742863b3e431b..c04fc8916fe1ac57e9b51e0b9fad5f3cbf255d8f 100644 (file)
--- a/gacela_draw.lisp
+++ b/gacela_draw.lisp
@@ -73,7 +73,7 @@
                      (cond ((/= zoomed-image 0) (values zoomed-image width height))))))))))
 
 (defun load-texture (filename &key (min-filter GL_LINEAR) (mag-filter GL_LINEAR) static)
-  (let ((key (make-texture :filename filename :min-filter min-filter :mag-filter mag-filter)))
+  (let ((key (make-resource-texture :filename filename :min-filter min-filter :mag-filter mag-filter)))
     (cond ((get-resource key) key)
          (t
           (progn-textures