Re: Info-mode's mode-hook isn't visible

[Kevin Rodgers]

mace wrote:

> On "GNU Emacs 21.2.1 (alpha-debian-linux-gnu, X toolkit, Xaw3d scroll
> bars) of 2002-03-27 on escher, modified by Debian" from a standard
> Debian package, i'm getting this minor bug:
>
> I noticed that the Info mode doesn't make it's "Info-mode-hook" visible
> with C-h v Info-mode-hook or such. It is evaluated however, on Info
> startup, so it works just fine if defined.


*** emacs-21.3/lisp/info.el.orig        Fri Dec 21 12:08:17 2001
--- emacs-21.3/lisp//info.el    Mon Feb  2 13:53:32 2004
***************
*** 963,968 ****
--- 963,973 ----
 (defvar Info-header-line nil
   "If the info node header is hidden, the text of the header.")
 
+ (defcustom Info-selection-hook nil
+   "Normal hook run by `Info-select-node'."
+   :type 'hook
+   :group 'info)
+ 
 (defun Info-select-node ()
 "Select the info node that point is in.
 Bind this in case the user sets it to nil."
***************
*** 2232,2237 ****
--- 2237,2247 ----
 ;; Info mode is suitable only for specially formatted data.
 (put 'Info-mode 'mode-class 'special)
 
+ (defcustom Info-mode-hook nil
+   "Normal hook run by `Info-mode-node'."
+   :type 'hook
+   :group 'info)
+ 
 (defun Info-mode ()
   "Info mode provides commands for browsing through the Info documentation 
tree.
 Documentation in Info is divided into \"nodes\", each of which discusses
***************
*** 2333,2338 ****
--- 2343,2353 ----
 ;; Info-edit mode is suitable only for specially formatted data.
 (put 'Info-edit-mode 'mode-class 'special)
 
+ (defcustom Info-edit-mode-hook nil
+   "Normal hook run by `Info-edit-mode-node'."
+   :type 'hook
+   :group 'info)
+ 
 (defun Info-edit-mode ()
   "Major mode for editing the contents of an Info node.
 Like text mode with the addition of `Info-cease-edit'


--
Kevin Rodgers