Mercurial > emacs

changeset 98920:60fa4a4ddd56

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Info-mode: Do not remove an existing header line if `Info-use-header-line' is nil.
author David Reitter <david.reitter@gmail.com>
date Mon, 20 Oct 2008 02:23:01 +0000
parents e99979838a3a
children fc7723b2b316
files lisp/info.el
diffstat 1 files changed, 3 insertions(+), 4 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/info.el	Mon Oct 20 02:17:47 2008 +0000
+++ b/lisp/info.el	Mon Oct 20 02:23:01 2008 +0000
@@ -3512,10 +3512,9 @@
   (make-local-variable 'Info-history)
   (make-local-variable 'Info-history-forward)
   (make-local-variable 'Info-index-alternatives)
-  (setq header-line-format
-	(if Info-use-header-line
-	    '(:eval (get-text-property (point-min) 'header-line))
-	  nil)) ; so the header line isn't displayed
+  (if Info-use-header-line    ; do not override global header lines
+      (setq header-line-format
+ 	    '(:eval (get-text-property (point-min) 'header-line))))
   (set (make-local-variable 'tool-bar-map) info-tool-bar-map)
   ;; This is for the sake of the invisible text we use handling titles.
   (make-local-variable 'line-move-ignore-invisible)