diff options
| -rw-r--r-- | lisp/language/english.el | 28 |
1 files changed, 14 insertions, 14 deletions
diff --git a/lisp/language/english.el b/lisp/language/english.el index 76d08f47297..05456640391 100644 --- a/lisp/language/english.el +++ b/lisp/language/english.el | |||
| @@ -36,7 +36,7 @@ The default status is as follows. | |||
| 36 | 36 | ||
| 37 | The default value of enable-multibyte-characters is t. | 37 | The default value of enable-multibyte-characters is t. |
| 38 | 38 | ||
| 39 | The default value of buffer-file-coding-system is iso-8859-1. | 39 | The default value of buffer-file-coding-system is nil. |
| 40 | The coding system for terminal output is nil. | 40 | The coding system for terminal output is nil. |
| 41 | The coding system for keyboard input is nil. | 41 | The coding system for keyboard input is nil. |
| 42 | 42 | ||
| @@ -47,7 +47,7 @@ The default status is as follows. | |||
| 47 | coding-category-iso-7 iso-2022-7 | 47 | coding-category-iso-7 iso-2022-7 |
| 48 | coding-category-iso-8-2 iso-8859-1 | 48 | coding-category-iso-8-2 iso-8859-1 |
| 49 | coding-category-iso-8-1 iso-8859-1 | 49 | coding-category-iso-8-1 iso-8859-1 |
| 50 | coding-category-iso-else iso-8859-1 | 50 | coding-category-iso-else iso-2022-lock |
| 51 | coding-category-emacs-mule emacs-mule | 51 | coding-category-emacs-mule emacs-mule |
| 52 | coding-category-binary no-conversion | 52 | coding-category-binary no-conversion |
| 53 | coding-category-sjis sjis | 53 | coding-category-sjis sjis |
| @@ -55,14 +55,12 @@ The default status is as follows. | |||
| 55 | " | 55 | " |
| 56 | (interactive) | 56 | (interactive) |
| 57 | (setq-default enable-multibyte-characters t) | 57 | (setq-default enable-multibyte-characters t) |
| 58 | (if (local-variable-p 'enable-multibyte-characters) | ||
| 59 | (setq enable-multibyte-characters t)) | ||
| 60 | 58 | ||
| 61 | (setq coding-category-emacs-mule 'emacs-mule | 59 | (setq coding-category-iso-7 'iso-2022-7 |
| 62 | coding-category-iso-7 'iso-2022-7 | ||
| 63 | coding-category-iso-8-1 'iso-8859-1 | 60 | coding-category-iso-8-1 'iso-8859-1 |
| 64 | coding-category-iso-8-2 'iso-8859-1 | 61 | coding-category-iso-8-2 'iso-8859-1 |
| 65 | coding-category-iso-else 'iso-8859-1 | 62 | coding-category-iso-else 'iso-2022-lock |
| 63 | coding-category-emacs-mule 'emacs-mule | ||
| 66 | coding-category-sjis 'sjis | 64 | coding-category-sjis 'sjis |
| 67 | coding-category-big5 'big5 | 65 | coding-category-big5 'big5 |
| 68 | coding-category-binary 'no-conversion) | 66 | coding-category-binary 'no-conversion) |
| @@ -73,16 +71,18 @@ The default status is as follows. | |||
| 73 | coding-category-iso-8-1 | 71 | coding-category-iso-8-1 |
| 74 | coding-category-iso-else | 72 | coding-category-iso-else |
| 75 | coding-category-emacs-mule | 73 | coding-category-emacs-mule |
| 76 | coding-category-binary | ||
| 77 | coding-category-sjis | 74 | coding-category-sjis |
| 78 | coding-category-big5)) | 75 | coding-category-big5 |
| 76 | coding-category-binary)) | ||
| 79 | 77 | ||
| 80 | (setq-default buffer-file-coding-system 'iso-8859-1) | 78 | (setq-default buffer-file-coding-system nil) |
| 81 | (set-terminal-coding-system nil) | 79 | (set-terminal-coding-system-internal nil) |
| 82 | (set-keyboard-coding-system nil) | 80 | (set-keyboard-coding-system-internal nil) |
| 83 | 81 | ||
| 84 | (setq sendmail-coding-system nil | 82 | (setq sendmail-coding-system nil |
| 85 | rmail-file-coding-system nil) | 83 | rmail-file-coding-system nil) |
| 84 | |||
| 85 | (setq nonascii-insert-offset 0) | ||
| 86 | ) | 86 | ) |
| 87 | 87 | ||
| 88 | (set-language-info-alist | 88 | (set-language-info-alist |
| @@ -90,9 +90,9 @@ The default status is as follows. | |||
| 90 | (tutorial . "TUTORIAL") | 90 | (tutorial . "TUTORIAL") |
| 91 | (charset . (ascii)) | 91 | (charset . (ascii)) |
| 92 | (sample-text . "Hello!, Hi!, How are you?") | 92 | (sample-text . "Hello!, Hi!, How are you?") |
| 93 | (documentation . ("\ | 93 | (documentation . "\ |
| 94 | There's nothing special you should care to handle English in Emacs. | 94 | There's nothing special you should care to handle English in Emacs. |
| 95 | You can use English both with enable-multibyte-characters t and nil.")) | 95 | You can use English both with enable-multibyte-characters t and nil.") |
| 96 | )) | 96 | )) |
| 97 | 97 | ||
| 98 | (register-input-method "English" | 98 | (register-input-method "English" |