From 664a3e038cac674c5ee2ddde9304620f248bced4 Mon Sep 17 00:00:00 2001 From: csr21 <unknown> Date: Thu, 15 May 2003 09:43:46 -0400 Subject: [PATCH] Don't lazily not call QUERY-FONT in OPEN-FONT any more, following Don't lazily not call QUERY-FONT in OPEN-FONT any more, following discussion on portable-clx-devel darcs-hash:20030515134346-ed5a3-2012d91caee39943691e0115179c3751d8f98019.gz --- fonts.lisp | 2 ++ 1 file changed, 2 insertions(+) diff --git a/fonts.lisp b/fonts.lisp index 4d557b4..a5bd4da 100644 --- a/fonts.lisp +++ b/fonts.lisp @@ -163,6 +163,8 @@ (string name-string)) (push font (display-font-cache display))) (incf (font-reference-count font)) + (unless (font-font-info-internal font) + (query-font font)) font)) (defun open-font-internal (font) -- GitLab