X-Git-Url: https://git.jsancho.org/?a=blobdiff_plain;f=gacela_draw.lisp;h=450ed133c0eb15e12d6aab2b4d762b35df3e6ce7;hb=a43020f63638aee6921f1c6333b0d81fa72d4e11;hp=90efd0611772cd693edde2b5e8e38fea8ed0f215;hpb=4859bd92e3604ae7f32ea84d815833caa2c6ee13;p=gacela.git diff --git a/gacela_draw.lisp b/gacela_draw.lisp index 90efd06..450ed13 100644 --- a/gacela_draw.lisp +++ b/gacela_draw.lisp @@ -76,7 +76,7 @@ ; (init-textures) ; (init-video-mode) (let ((key (make-texture :filename filename :min-filter min-filter :mag-filter mag-filter))) - (cond ((get-resource key) key) + (cond ((get-resource key) t) (t (progn-textures (multiple-value-bind