From: Richard M. Stallman <rms@gnu.org>
Date: Sun, 7 Sep 1997 03:39:44 +0000 (+0000)
Subject: (read-language-name): Doc fix.
X-Git-Tag: emacs-20.1~164
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=fc0678afb9207f0da28512e3c7ccd3ce5217a7ec;p=emacs.git

(read-language-name): Doc fix.
(set-language-environment): Improve prompt.
---

diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el
index d338ae0835b..d59db76a47d 100644
--- a/lisp/international/mule-cmds.el
+++ b/lisp/international/mule-cmds.el
@@ -316,7 +316,7 @@ ALIST is an alist of KEY and INFO.  See the documentation of
 (defun read-language-name (key prompt &optional default)
   "Read language name which has information for KEY, prompting with PROMPT.
 DEFAULT is the default choice of language.
-It returns a string as language name."
+This returns a language name as a string."
   (let* ((completion-ignore-case t)
 	 (name (completing-read prompt
 				language-info-alist
@@ -631,7 +631,7 @@ But, if this flag is non-nil, the input method is never back on.")
 This sets the coding system priority and the default input method
 and sometimes other things."
   (interactive (list (read-language-name 'setup-function
-					 "Language (null for default): ")))
+					 "Set language environment: ")))
   (if language-name
       (if (symbolp language-name)
 	  (setq language-name (symbol-name language-name)))