changeset 57542:06006ae6008a

(help-at-pt-unload-hook): Use add-hook; no defvar.
author Richard M. Stallman <rms@gnu.org>
date Sun, 17 Oct 2004 06:54:13 +0000
parents 841073f11023
children e47852bd4fc4
files lisp/help-at-pt.el
diffstat 1 files changed, 1 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/help-at-pt.el	Sun Oct 17 06:53:08 2004 +0000
+++ b/lisp/help-at-pt.el	Sun Oct 17 06:54:13 2004 +0000
@@ -348,8 +348,7 @@
   (interactive "p")
   (scan-buf-move-to-region 'help-echo (- arg) 'scan-buf-move-hook))
 
-(defvar help-at-pt-unload-hook '(help-at-pt-cancel-timer)
-  "Normal hook run when `help-at-pt' is unloaded.")
+(add-hook 'help-at-pt-unload-hook 'help-at-pt-cancel-timer)
 
 (provide 'help-at-pt)