X-Git-Url: https://git.jsancho.org/?a=blobdiff_plain;f=gacela_ttf.lisp;h=3cb84932e975b4303fcd72dbb52cd85e69897eff;hb=fdfb434956fca60457a18b4ab5cb0df067ec9a8b;hp=931f3c89ba2b688ecceab160975915916e042abf;hpb=18b7b395aeba9aabdd47c52a0ae6bcd7d0f78f00;p=gacela.git

diff --git a/gacela_ttf.lisp b/gacela_ttf.lisp
index 931f3c8..3cb8493 100644
--- a/gacela_ttf.lisp
+++ b/gacela_ttf.lisp
@@ -35,4 +35,4 @@
 	   key))))
 
 (defun render-text (text font)
-  (ftglRenderFont (getf font :id-font) text FTGL_RENDER_ALL))
+  (ftglRenderFont (getf (get-resource font) :id-font) text FTGL_RENDER_ALL))