From fc0678afb9207f0da28512e3c7ccd3ce5217a7ec Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sun, 7 Sep 1997 03:39:44 +0000 Subject: [PATCH] (read-language-name): Doc fix. (set-language-environment): Improve prompt. --- lisp/international/mule-cmds.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) 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))) -- 2.39.2