X-Git-Url: https://git.jsancho.org/?a=blobdiff_plain;f=gacela_ttf.lisp;fp=gacela_ttf.lisp;h=3cb84932e975b4303fcd72dbb52cd85e69897eff;hb=8caa865a3194eb573382a411df7636ebb472ca1f;hp=931f3c89ba2b688ecceab160975915916e042abf;hpb=35c768d6dbc22d731b9f2626b783b91530ea651f;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))