summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorKenichi Handa <handa@m17n.org>1997-08-16 01:55:27 +0000
committerKenichi Handa <handa@m17n.org>1997-08-16 01:55:27 +0000
commit52c4da1db826e5b60c411ce6ff021906fe6a4c9d (patch)
treedda6692e52521ad62363a51a2009a68681863faf
parent7f1736c9f33618bff1e72145104a9d0b8be15be4 (diff)
downloademacs-52c4da1db826e5b60c411ce6ff021906fe6a4c9d.tar.gz
(setup-8-bit-environment): Delete
a code setting default value of default-input-method.
-rw-r--r--lisp/language/european.el6
1 files changed, 2 insertions, 4 deletions
diff --git a/lisp/language/european.el b/lisp/language/european.el
index f2d5e40e1be..aa77d3a11bb 100644
--- a/lisp/language/european.el
+++ b/lisp/language/european.el
@@ -53,9 +53,7 @@
(setq nonascii-insert-offset nonascii-offset)))
(if input-method
- (progn
- (setq default-input-method input-method)
- (setq-default default-input-method input-method)))
+ (setq default-input-method input-method))
;; If this is a Latin-N character set, set up syntax for it in
;; single-byte mode.
@@ -68,7 +66,7 @@
'iso-latin-1 2 ?1
"ISO 2022 based 8-bit encoding (MIME:ISO-8859-1, Compound Text Encoding)"
'((ascii t) (latin-iso8859-1 t) nil nil
- nil ascii-eol ascii-cntl))
+ nil ascii-eol ascii-cntl nil nil nil nil nil nil nil nil nil t))
(define-coding-system-alias 'iso-8859-1 'iso-latin-1)
(define-coding-system-alias 'latin-1 'iso-latin-1)