From 35f825bdaba522387f525cc2d4cac78420770375 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sun, 17 Oct 2004 06:54:13 +0000 Subject: [PATCH] (help-at-pt-unload-hook): Use add-hook; no defvar. --- lisp/help-at-pt.el | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/lisp/help-at-pt.el b/lisp/help-at-pt.el index ad1f2b3a96a..d6ac6ec3fdc 100644 --- a/lisp/help-at-pt.el +++ b/lisp/help-at-pt.el @@ -348,8 +348,7 @@ different regions. With numeric argument ARG, behaves like (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) -- 2.39.5