From: Kenichi Handa <handa@m17n.org>
Date: Thu, 14 Jan 1999 01:20:35 +0000 (+0000)
Subject: (describe-language-environment):
X-Git-Tag: emacs-20.4~883
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=00a069c6471597930517b96230bee4565da94a81;p=emacs.git

(describe-language-environment):
Don't alter input-method-alist.
---

diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el
index e469d573e62..c05129bfc17 100644
--- a/lisp/international/mule-cmds.el
+++ b/lisp/international/mule-cmds.el
@@ -1379,7 +1379,7 @@ of buffer-file-coding-system set by this function."
 	      (princ-list "  " str)
 	      (terpri))))
       (let ((input-method (get-language-info language-name 'input-method))
-	    (l input-method-alist))
+	    (l (copy-sequence input-method-alist)))
 	(princ "Input methods")
 	(when input-method
 	  (princ (format " (default, %s)" input-method))