Mercurial > emacs
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)) |