(describe-coding-system): Describe `dependency' property..

diff --git a/lisp/international/mule-diag.el b/lisp/international/mule-diag.el
index 2b8b225963e034bd55612fa025eaaa08cd3f43d9..78c0e1c0e6ef03b7abf62eb19e56551a0b71bf68 100644 (file)
--- a/lisp/international/mule-diag.el
+++ b/lisp/international/mule-diag.el
@@ -618,6 +618,16 @@ PC `codepages' and other coded character sets.  See `non-iso-charset-alist'."
     (with-output-to-temp-buffer (help-buffer)
       (print-coding-system-briefly coding-system 'doc-string)
       (princ "\n")
+      (let ((vars (coding-system-get coding-system 'dependency)))
+       (when vars
+         (princ "See also the documentation of these customizable variables
+which alter the behaviour of this coding system.\n")
+         (dolist (v vars)
+           (princ "  `")
+           (princ v)
+           (princ "'\n"))
+         (princ "\n")))
+
       (princ "Type: ")
       (let ((type (coding-system-type coding-system))
            (flags (coding-system-flags coding-system)))