# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 743535302 0
# Node ID f9599125f7f097743ea8b846e29b3b91cd1160ed
# Parent  e0713a13f2d71458baaaa703aa58ad0208ae6458
(Info-select-node): Run Info-selection-hook.

diff -r e0713a13f2d7 -r f9599125f7f0 lisp/info.el
--- a/lisp/info.el	Sat Jul 24 08:42:00 1993 +0000
+++ b/lisp/info.el	Sat Jul 24 17:35:02 1993 +0000
@@ -475,7 +475,8 @@
 				  (setq active-expression
 					(read (current-buffer))))))
 			 (point-max)))
-     (if Info-enable-active-nodes (eval active-expression)))))
+     (if Info-enable-active-nodes (eval active-expression))
+     (run-hooks 'Info-selection-hook))))
 
 (defun Info-set-mode-line ()
   (setq mode-line-buffer-identification