]> git.eshelyaron.com Git - emacs.git/commitdiff
(w32-initialize-window-system): Use t, not nil to signify default fontset.
authorJason Rumney <jasonr@gnu.org>
Sat, 17 Nov 2007 02:40:11 +0000 (02:40 +0000)
committerJason Rumney <jasonr@gnu.org>
Sat, 17 Nov 2007 02:40:11 +0000 (02:40 +0000)
lisp/term/w32-win.el

index cba8ba0cbb732deb2f790ac774b0a5b2e0bfae54..688dd7deea89b974ca0e3601ce89691c160f6e69 100644 (file)
@@ -1082,12 +1082,6 @@ See the documentation of `create-fontset-from-fontset-spec' for the format.")
   (error "Suspending an Emacs running under W32 makes no sense"))
 
 
-;;; Enable Japanese fonts on Windows to be used by default.
-;; (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 an Emacs font from a list of known good fonts and fontsets.
 
@@ -1160,13 +1154,13 @@ pop-up menu are unaffected by `w32-list-proportional-fonts')."
   (setup-default-fontset)
 
   ;; Enable Japanese fonts on Windows to be used by default.
-  (set-fontset-font nil (make-char 'katakana-jisx0201)
+  (set-fontset-font t (make-char 'katakana-jisx0201)
                    '("*" . "JISX0208-SJIS"))
-  (set-fontset-font nil (make-char 'latin-jisx0201)
+  (set-fontset-font t (make-char 'latin-jisx0201)
                    '("*" . "JISX0208-SJIS"))
-  (set-fontset-font nil (make-char 'japanese-jisx0208)
+  (set-fontset-font t (make-char 'japanese-jisx0208)
                    '("*" . "JISX0208-SJIS"))
-  (set-fontset-font nil (make-char 'japanese-jisx0208-1978)
+  (set-fontset-font t (make-char 'japanese-jisx0208-1978)
                    '("*" . "JISX0208-SJIS"))
 
   ;; Create the standard fontset.