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

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

[mace]

Erm, yeah. Hello. I'm not sure if i'll be using quite the appropriate
Emacs-terms, but here goes.

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.

Okay, keep it up. This Emacs really roxx0rs :)

.mace --- 0201 2112 2 ff

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