changeset 21471:ae34e7d5c51f

(describe-language-environment): Print the languge environment at the head.
author Kenichi Handa <handa@m17n.org>
date Sat, 11 Apr 1998 02:18:31 +0000
parents b6c858daa80d
children c0e398eea0bd
files lisp/international/mule-cmds.el
diffstat 1 files changed, 1 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/international/mule-cmds.el	Sat Apr 11 02:18:31 1998 +0000
+++ b/lisp/international/mule-cmds.el	Sat Apr 11 02:18:31 1998 +0000
@@ -897,6 +897,7 @@
       (setq language-name (symbol-name language-name)))
   (let ((doc (get-language-info language-name 'documentation)))
     (with-output-to-temp-buffer "*Help*"
+      (princ-list language-name " language environment" "\n")
       (if (stringp doc)
 	  (progn
 	    (princ-list doc)