X-Git-Url: https://git.jsancho.org/?a=blobdiff_plain;f=gacela_draw.lisp;h=5d10fa4eebb8a2d9ed5009020e8f52ca73ae655e;hb=c0c271a74a11ccba4e5c2c51e46045c9073c32a6;hp=c984948fbbfa351a9aab7bd0cfc4dba3390d85d7;hpb=8caa865a3194eb573382a411df7636ebb472ca1f;p=gacela.git

diff --git a/gacela_draw.lisp b/gacela_draw.lisp
index c984948..5d10fa4 100644
--- a/gacela_draw.lisp
+++ b/gacela_draw.lisp
@@ -114,7 +114,6 @@
       (cond (texture
 	     (let ((width (getf (get-resource texture) :width))
 		   (height (getf (get-resource texture) :height)))
-(print texture)
 	       (draw-rectangle (* f width) (* f height) :texture texture)))))))
 
 (defun draw-quad (v1 v2 v3 v4 &key texture)