From 838fc3ef5cd37a9ba381e6424a177fba815a2e7e Mon Sep 17 00:00:00 2001 From: Jason Rumney Date: Sun, 24 Feb 2002 01:05:13 +0000 Subject: [PATCH] (w32-charset-info-alist): Use ansi fonts for iso10646-1 if unicode is not available. --- lisp/ChangeLog | 5 +++++ lisp/w32-fns.el | 8 +++++--- 2 files changed, 10 insertions(+), 3 deletions(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index 4baedc19edf..24ba526b343 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2002-02-24 Jason Rumney + + * w32-fns.el (w32-charset-info-alist): Use ansi fonts for + iso10646-1 if unicode is not available. + 2002-02-22 Stefan Monnier * diff-mode.el (diff-end-of-hunk): Watch out for ambiguous headers. diff --git a/lisp/w32-fns.el b/lisp/w32-fns.el index f4fb5e1f50f..f4a309fdebf 100644 --- a/lisp/w32-fns.el +++ b/lisp/w32-fns.el @@ -403,9 +403,11 @@ bit output with no translation." (w32-add-charset-info "mac" 'w32-charset-mac nil))) (if (boundp 'w32-unicode-charset-defined) (progn - (w32-add-charset-info "iso10646" 'w32-charset-unicode t) - (w32-add-charset-info "unicode" 'w32-charset-unicode t))) - + (w32-add-charset-info "iso10646-1" 'w32-charset-unicode t) + (w32-add-charset-info "unicode" 'w32-charset-unicode t)) + ;; Most Windows fonts cover a large part of the Unicode range, + ;; so use ansi fonts if unicode is not an option. + (w32-add-charset-info "iso10646-1" 'w32-charset-ansi t)) (make-obsolete-variable 'w32-enable-italics 'w32-enable-synthesized-fonts "21.1") -- 2.39.5