Mercurial > emacs
changeset 93576:ed9ff03f156c
(create-fontset-from-x-resource):
Handle the error of X resource more gracefully.
author | Kenichi Handa <handa@m17n.org> |
---|---|
date | Thu, 03 Apr 2008 04:06:55 +0000 |
parents | 7303db4cd998 |
children | bac2b63b476f |
files | lisp/international/fontset.el |
diffstat | 1 files changed, 3 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/international/fontset.el Thu Apr 03 04:06:48 2008 +0000 +++ b/lisp/international/fontset.el Thu Apr 03 04:06:55 2008 +0000 @@ -944,7 +944,9 @@ fontset-spec) (while (setq fontset-spec (x-get-resource (format "fontset-%d" idx) (format "Fontset-%d" idx))) - (create-fontset-from-fontset-spec fontset-spec t 'noerror) + (condition-case nil + (create-fontset-from-fontset-spec fontset-spec t 'noerror) + (error (message "Fontset-%d: invalid specification in X resource" idx))) (setq idx (1+ idx))))) ;;