# HG changeset patch # User Kenichi Handa # Date 871696527 0 # Node ID 1a7bd3dd824ec3d5d448e70d33dc28e452f7ac72 # Parent 63415fa4039d1db4cf47a42363eb49c3fbb4df0d (setup-8-bit-environment): Delete a code setting default value of default-input-method. diff -r 63415fa4039d -r 1a7bd3dd824e lisp/language/european.el --- a/lisp/language/european.el Sat Aug 16 01:55:27 1997 +0000 +++ b/lisp/language/european.el Sat Aug 16 01:55:27 1997 +0000 @@ -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)