comparison lisp/man.el @ 3619:062dbb10173d

(Man-mode): Run Man-mode-hook.
author Richard M. Stallman <rms@gnu.org>
date Thu, 10 Jun 1993 17:48:36 +0000
parents 507f64624555
children 9e251319cdc8
comparison
equal deleted inserted replaced
3618:58f653fa4e5b 3619:062dbb10173d
557 (buffer-disable-undo (current-buffer)) 557 (buffer-disable-undo (current-buffer))
558 (auto-fill-mode -1) 558 (auto-fill-mode -1)
559 (use-local-map Man-mode-map) 559 (use-local-map Man-mode-map)
560 (goto-char (point-min)) 560 (goto-char (point-min))
561 (Man-build-page-list) 561 (Man-build-page-list)
562 (Man-goto-page 1)) 562 (Man-goto-page 1)
563 (run-hooks 'Man-mode-hook))
563 564
564 (defun Man-build-section-alist () 565 (defun Man-build-section-alist ()
565 "Build the association list of manpage sections." 566 "Build the association list of manpage sections."
566 (setq Man-sections-alist nil) 567 (setq Man-sections-alist nil)
567 (goto-char (point-min)) 568 (goto-char (point-min))