diff options
author | Kenichi Handa <handa@m17n.org> | 2002-10-01 06:56:53 +0000 |
---|---|---|
committer | Kenichi Handa <handa@m17n.org> | 2002-10-01 06:56:53 +0000 |
commit | 3c18889e3b62cd0f133ba0f392984212a979ef26 (patch) | |
tree | 3d6959f2baeb5fc2d6aa61d221943dce203ebf14 | |
parent | a8cb58ee0185b4a9c04df39f15b19ceabf7424b7 (diff) | |
download | emacs-3c18889e3b62cd0f133ba0f392984212a979ef26.tar.gz |
(describe-coding-system): Describe `dependency' property.
-rw-r--r-- | lisp/international/mule-diag.el | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/lisp/international/mule-diag.el b/lisp/international/mule-diag.el index a967844f305..24b6a5d7018 100644 --- a/lisp/international/mule-diag.el +++ b/lisp/international/mule-diag.el @@ -668,6 +668,17 @@ which font is being used for displaying the character." (describe-current-coding-system) (with-output-to-temp-buffer "*Help*" (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"))) + (let ((coding-spec (coding-system-spec coding-system))) (princ "Type: ") (let ((type (coding-system-type coding-system)) |