From: Kenichi Handa <handa@m17n.org>
Date: Wed, 16 Apr 2003 12:27:05 +0000 (+0000)
Subject: (describe-language-environment): At
X-Git-Tag: ttn-vms-21-2-B4~10492
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=ef5a4730db25ca5cf34c476799b44e11b8e526f1;p=emacs.git

(describe-language-environment): At
first, require all necessary features.
---

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)