diff options
| author | Richard M. Stallman | 1997-08-19 04:48:43 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1997-08-19 04:48:43 +0000 |
| commit | e5023df970bf30a68bd56b0be1e55791f9fad4ba (patch) | |
| tree | c5c7901aae88037163d30840ab7a5748c489c146 | |
| parent | c5637d842b86fe9d184e2d6a519718783d8ca8bd (diff) | |
| download | emacs-e5023df970bf30a68bd56b0be1e55791f9fad4ba.tar.gz emacs-e5023df970bf30a68bd56b0be1e55791f9fad4ba.zip | |
Don't set primary-language.
| -rw-r--r-- | lisp/language/china-util.el | 6 |
1 files changed, 0 insertions, 6 deletions
diff --git a/lisp/language/china-util.el b/lisp/language/china-util.el index 3b0039cccfc..4942a064b24 100644 --- a/lisp/language/china-util.el +++ b/lisp/language/china-util.el | |||
| @@ -30,8 +30,6 @@ | |||
| 30 | (interactive) | 30 | (interactive) |
| 31 | (setup-english-environment) | 31 | (setup-english-environment) |
| 32 | 32 | ||
| 33 | (setq primary-language "Chinese-GB") | ||
| 34 | |||
| 35 | (set-default-coding-systems 'chinese-iso-8bit) | 33 | (set-default-coding-systems 'chinese-iso-8bit) |
| 36 | (setq coding-category-iso-8-2 'chinese-iso-8bit) | 34 | (setq coding-category-iso-8-2 'chinese-iso-8bit) |
| 37 | (setq coding-category-iso-7-else 'chinese-iso-7bit) | 35 | (setq coding-category-iso-7-else 'chinese-iso-7bit) |
| @@ -58,8 +56,6 @@ | |||
| 58 | (interactive) | 56 | (interactive) |
| 59 | (setup-english-environment) | 57 | (setup-english-environment) |
| 60 | 58 | ||
| 61 | (setq primary-language "Chinese-BIG5") | ||
| 62 | |||
| 63 | (set-default-coding-systems 'chinese-big5) | 59 | (set-default-coding-systems 'chinese-big5) |
| 64 | (setq coding-category-iso-8-2 'chinese-big5) | 60 | (setq coding-category-iso-8-2 'chinese-big5) |
| 65 | (setq coding-category-iso-7-else 'chinese-iso-7bit) | 61 | (setq coding-category-iso-7-else 'chinese-iso-7bit) |
| @@ -85,8 +81,6 @@ | |||
| 85 | (interactive) | 81 | (interactive) |
| 86 | (setup-english-environment) | 82 | (setup-english-environment) |
| 87 | 83 | ||
| 88 | (setq primary-language "Chinese-CNS") | ||
| 89 | |||
| 90 | (setq coding-category-iso-7-else 'chinese-iso-7bit) | 84 | (setq coding-category-iso-7-else 'chinese-iso-7bit) |
| 91 | (setq coding-category-big5 'chinese-big5) | 85 | (setq coding-category-big5 'chinese-big5) |
| 92 | (setq coding-category-iso-8-2 'chinese-big5) | 86 | (setq coding-category-iso-8-2 'chinese-big5) |