(describe-language-environment): At

first, require all necessary features.

2 files changed, 7 insertions, 0 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6e402fc2615..d23f77dfa18 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2003-04-16  Kenichi Handa  <handa@m17n.org>
+
+        * international/mule-cmds.el (describe-language-environment): At
+        first, require all necessary features.
+
 2003-04-16  Dave Love  <fx@gnu.org>
 
         * progmodes/xscheme.el: Moved from lisp directory.
diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el
index 69643d97930..f165bf4c236 100644
--- a/lisp/international/mule-cmds.el
+++ b/lisp/international/mule-cmds.el
@@ -1853,6 +1853,8 @@ of `buffer-file-coding-system' set by this function."
       (error "No documentation for the specified language"))
   (if (symbolp language-name)
       (setq language-name (symbol-name language-name)))
+  (dolist (feature (get-language-info language-name 'features))
+    (require feature))
   (let ((doc (get-language-info language-name 'documentation))
         pos)
     (help-setup-xref (list #'describe-language-environment language-name)