# HG changeset patch # User Kenichi Handa # Date 1045745027 0 # Node ID 3b81891b77035d2aec16587090e6c202840bf763 # Parent 95289e554702de857bbcf1a1cf195740e1651158 Call set-fontset-font with NAME nil. diff -r 95289e554702 -r 3b81891b7703 lisp/term/w32-win.el --- a/lisp/term/w32-win.el Thu Feb 20 12:42:39 2003 +0000 +++ b/lisp/term/w32-win.el Thu Feb 20 12:43:47 2003 +0000 @@ -1229,10 +1229,10 @@ (list face (if (equal value "") nil value)))) ;;; Enable Japanese fonts on Windows to be used by default. -(set-fontset-font t (make-char 'katakana-jisx0201) '("*" . "JISX0208-SJIS")) -(set-fontset-font t (make-char 'latin-jisx0201) '("*" . "JISX0208-SJIS")) -(set-fontset-font t (make-char 'japanese-jisx0208) '("*" . "JISX0208-SJIS")) -(set-fontset-font t (make-char 'japanese-jisx0208-1978) '("*" . "JISX0208-SJIS")) +(set-fontset-font nil (make-char 'katakana-jisx0201) '("*" . "JISX0208-SJIS")) +(set-fontset-font nil (make-char 'latin-jisx0201) '("*" . "JISX0208-SJIS")) +(set-fontset-font nil (make-char 'japanese-jisx0208) '("*" . "JISX0208-SJIS")) +(set-fontset-font nil (make-char 'japanese-jisx0208-1978) '("*" . "JISX0208-SJIS")) (defun mouse-set-font (&rest fonts) "Select a font.