From e27c25aebc60af868e0bfdac6070691f348c4f9a Mon Sep 17 00:00:00 2001 From: Gerd Moellmann Date: Thu, 15 Jun 2000 14:42:48 +0000 Subject: [PATCH] (Info-set-mode-line): Show file name in mode line, use `*Info*' instead of `Info:'. --- lisp/info.el | 12 +++++------- 1 file changed, 5 insertions(+), 7 deletions(-) diff --git a/lisp/info.el b/lisp/info.el index abc21a6a13c..76abc9043f9 100644 --- a/lisp/info.el +++ b/lisp/info.el @@ -855,13 +855,11 @@ Bind this in case the user sets it to nil." (defun Info-set-mode-line () (setq mode-line-buffer-identification (concat - " Info: (" - (if Info-current-file - (file-name-nondirectory (if (stringp Info-current-file) - Info-current-file - (or buffer-file-name ""))) - "") - ")" + " *Info* (" + (file-name-nondirectory (if (stringp Info-current-file) + Info-current-file + (or buffer-file-name ""))) + ") " (or Info-current-node "")))) ;; Go to an info node specified with a filename-and-nodename string -- 2.39.5