(setup-specified-language-environment): Add apropos-inhibit property.

(describe-specified-language-support): Likewise.

1 files changed, 4 insertions, 0 deletions

diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el
index f23316a71c7..266ad0c83f2 100644
--- a/lisp/international/mule-cmds.el
+++ b/lisp/international/mule-cmds.el
@@ -1037,6 +1037,8 @@ is still bound to the language environment being exited.
 This hook is mainly used for canceling the effect of
 `set-language-environment-hook' (which-see).")
 
+(put 'setup-specified-language-environment 'apropos-inhibit t)
+
 (defun setup-specified-language-environment ()
   "Switch to a specified language environment."
   (interactive)
@@ -1239,6 +1241,8 @@ specifies the character set for the major languages of Western Europe."
   (while args (princ (car args)) (setq args (cdr args)))
   (princ "\n"))
 
+(put 'describe-specified-language-support 'apropos-inhibit t)
+
 ;; Print a language specific information such as input methods,
 ;; charsets, and coding systems.  This function is intended to be
 ;; called from the menu: