From a33c9d6fcfe292d94c0cc407126afc2be3d7a33c Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Sat, 11 Apr 1998 02:18:31 +0000 Subject: [PATCH] (describe-language-environment): Print the languge environment at the head. --- lisp/international/mule-cmds.el | 1 + 1 file changed, 1 insertion(+) diff --git a/lisp/international/mule-cmds.el b/lisp/international/mule-cmds.el index a6526ff0160..8f0eac97663 100644 --- a/lisp/international/mule-cmds.el +++ b/lisp/international/mule-cmds.el @@ -897,6 +897,7 @@ specifies the character set for the major languages of Western Europe." (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) -- 2.39.2