# HG changeset patch
# User Jason Rumney <jasonr@gnu.org>
# Date 1004122781 0
# Node ID 1f8fda3ed895c90812c2253d04e392a42822a033
# Parent  d184455da497ee5141db1e3c4d0f94590cbbfaf4
Use ANSI fonts for iso10646-1 if UNICODE is not defined in system headers.

diff -r d184455da497 -r 1f8fda3ed895 lisp/w32-fns.el
--- a/lisp/w32-fns.el	Fri Oct 26 17:51:38 2001 +0000
+++ b/lisp/w32-fns.el	Fri Oct 26 18:59:41 2001 +0000
@@ -402,9 +402,10 @@
       (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))
+  ;; If unicode windows charset is not defined, use ansi fonts.
+  (w32-add-charset-info "iso10646-1" 'w32-charset-ansi t))
 
 (make-obsolete-variable 'w32-enable-italics
                         'w32-enable-synthesized-fonts "21.1")