diff lisp/international/mule-cmds.el @ 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 bc409dfad8e7
children b26c7c2891b4
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)