Mercurial > hg > xemacs-beta
diff lisp/font.el @ 4766:32b358a240b0
Avoid calling Xft if not built in.
| author | Stephen J. Turnbull <stephen@xemacs.org> |
|---|---|
| date | Sat, 05 Dec 2009 01:02:33 +0900 |
| parents | aa5ed11f473b |
| children | e0db3c197671 8b2f75cecb89 |
line wrap: on
line diff
--- a/lisp/font.el Fri Dec 04 10:59:45 2009 +0900 +++ b/lisp/font.el Sat Dec 05 01:02:33 2009 +0900 @@ -569,6 +569,7 @@ (if (or (not (stringp fontname)) (not (string-match font-x-font-regexp fontname))) (if (and (stringp fontname) + (featurep 'xft-fonts) (string-match font-xft-font-regexp fontname)) ;; Return an XFT font. (xft-font-create-object fontname)