Mercurial > emacs

changeset 19371:18e804fd153b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(setup-chinese-gb-environment): Delete a code setting default value of default-input-method. (setup-chinese-big5-environment): Likewise. (setup-chinese-cns-environment): Likewise.
author Kenichi Handa <handa@m17n.org>
date Sat, 16 Aug 1997 01:55:27 +0000
parents 85ff5423525f
children d9d25c2a6cd4
files lisp/language/china-util.el
diffstat 1 files changed, 3 insertions(+), 6 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/language/china-util.el	Sat Aug 16 01:55:27 1997 +0000
+++ b/lisp/language/china-util.el	Sat Aug 16 01:55:27 1997 +0000
@@ -50,8 +50,7 @@
   (setq default-terminal-coding-system 'chinese-iso-8bit)
   (setq default-keyboard-coding-system 'chinese-iso-8bit)
 
-  (setq default-input-method  "chinese-py-punct")
-  (setq-default default-input-method "chinese-py-punct"))
+  (setq default-input-method  "chinese-py-punct"))
 
 ;;;###autoload
 (defun setup-chinese-big5-environment ()
@@ -78,8 +77,7 @@
   (setq default-terminal-coding-system 'chinese-big5)
   (setq default-keyboard-coding-system 'chinese-big5)
 
-  (setq default-input-method "chinese-py-punct-b5")
-  (setq-default default-input-method "chinese-py-punct-b5"))
+  (setq default-input-method "chinese-py-punct-b5"))
 
 ;;;###autoload
 (defun setup-chinese-cns-environment ()
@@ -105,8 +103,7 @@
   (setq default-terminal-coding-system 'chinese-iso-7bit)
   (setq default-keyboard-coding-system 'chinese-iso-7bit)
 
-  (setq default-input-method "chinese-quick-cns")
-  (setq-default default-input-method "chinese-quick-cns"))
+  (setq default-input-method "chinese-quick-cns"))
 
 ;; Hz/ZW encoding stuffs