Error message fix in `describe-specified-language-support'

* international/mule-cmds.el
(describe-specified-language-support): Make the error message
clearer (bug#8905).

2 files changed, 5 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index c315d6a2ff3..3f32e44beb2 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,9 @@
 2011-07-15  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
+        * international/mule-cmds.el
+        (describe-specified-language-support): Make the error message
+        clearer (bug#8905).
+
         * emacs-lisp/cl-macs.el (declare): Add a doc string (bug#8690).
 
         * isearch.el (isearch-barrier): Add a doc string, since it's
diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el
index 6a73aaaa838..128fb86b7b4 100644
--- a/lisp/international/mule-cmds.el
+++ b/lisp/international/mule-cmds.el
@@ -2059,7 +2059,7 @@ See `set-language-info-alist' for use in programs."
                   (or (not (eq last-command-event 'Default))
                       (setq last-command-event 'English))
                   (setq language-name (symbol-name last-command-event))))
-        (error "Bogus calling sequence"))
+        (error "This command should only be called from the menu bar"))
     (describe-language-environment language-name)))
 
 (defun describe-language-environment (language-name)