Mercurial > emacs
changeset 90990:9a2ae52d083c
(print-fontset-element): Use fontp
only if defined.
author | Andreas Schwab <schwab@suse.de> |
---|---|
date | Wed, 25 Jul 2007 23:43:16 +0000 |
parents | 1a04225b86b9 |
children | c25c6957ba4a |
files | lisp/international/mule-diag.el |
diffstat | 1 files changed, 1 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/international/mule-diag.el Wed Jul 25 14:57:09 2007 +0000 +++ b/lisp/international/mule-diag.el Wed Jul 25 23:43:16 2007 +0000 @@ -878,7 +878,7 @@ (if (stringp requested) (insert "\n " requested) (let (family registry weight slant width adstyle) - (if (fontp requested) + (if (and (fboundp 'fontp) (fontp requested)) (setq family (font-get requested :family) registry (font-get requested :registry) weight (font-get requested :weight)