(Info-header-line): Mark it as risky-local-variable.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 9c06ede1d63ddfff4bfaedd8c14e7b1f2a2c80bb..7690e32e2815f93046cbfbd6c147c8b6a6a0bda2 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2002-04-27  Richard M. Stallman  <rms@gnu.org>
 
+       * info.el (Info-header-line): Mark it as risky-local-variable.
+
        * subr.el (insert-for-yank): Replace `category' property
        with whatever properties it stands for.
 

diff --git a/lisp/info.el b/lisp/info.el
index 86642b7fd361f73004d26585e1dd35104304e29c..e4211c134c6784b3728c3e7a20688f269359a532 100644 (file)
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -961,6 +961,7 @@ a case-insensitive match is tried."
 
 (defvar Info-header-line nil
   "If the info node header is hidden, the text of the header.")
+(put 'Info-header-line 'risky-local-variable t)
 
 (defun Info-select-node ()
 "Select the info node that point is in.