diff options
| author | Andrew Innes | 1999-05-03 22:19:43 +0000 |
|---|---|---|
| committer | Andrew Innes | 1999-05-03 22:19:43 +0000 |
| commit | d76d2456576b3825e1c1cb36c001efa55fadd50a (patch) | |
| tree | 9732b7448c94133561874fa783a5139daa46b5ac | |
| parent | e5124be7f7f463d6e4b40cccf62ef4579d60e995 (diff) | |
| download | emacs-d76d2456576b3825e1c1cb36c001efa55fadd50a.tar.gz emacs-d76d2456576b3825e1c1cb36c001efa55fadd50a.zip | |
Change the x-charset-registry property for the
Japanese charsets that are supported by Japanese Windows fonts.
| -rw-r--r-- | lisp/term/w32-win.el | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/lisp/term/w32-win.el b/lisp/term/w32-win.el index 39eb15bac29..55d680d5e5e 100644 --- a/lisp/term/w32-win.el +++ b/lisp/term/w32-win.el | |||
| @@ -884,6 +884,13 @@ fixed width fonts that most people will have like Terminal and | |||
| 884 | Courier. These fonts are used in the font menu if the variable | 884 | Courier. These fonts are used in the font menu if the variable |
| 885 | `w32-use-w32-font-dialog' is nil.") | 885 | `w32-use-w32-font-dialog' is nil.") |
| 886 | 886 | ||
| 887 | ;;; Enable Japanese fonts on Windows to be used by default. | ||
| 888 | (put-charset-property 'katakana-jisx0201 'x-charset-registry "JISX0208-SJIS") | ||
| 889 | (put-charset-property 'latin-jisx0201 'x-charset-registry "JISX0208-SJIS") | ||
| 890 | (put-charset-property 'japanese-jisx0208 'x-charset-registry "JISX0208-SJIS") | ||
| 891 | (put-charset-property 'japanese-jisx0208-1978 'x-charset-registry | ||
| 892 | "JISX0208-SJIS") | ||
| 893 | |||
| 887 | (defun mouse-set-font (&rest fonts) | 894 | (defun mouse-set-font (&rest fonts) |
| 888 | "Select a font. If `w32-use-w32-font-dialog' is non-nil (the default), | 895 | "Select a font. If `w32-use-w32-font-dialog' is non-nil (the default), |
| 889 | use the Windows font dialog. Otherwise use a pop-up menu (like Emacs | 896 | use the Windows font dialog. Otherwise use a pop-up menu (like Emacs |