mirror of
git://git.sv.gnu.org/emacs.git
synced 2026-02-10 18:00:30 -08:00
(Man-mode): Use kill-all-local-variables and run-mode-hooks.
This commit is contained in:
parent
9b5e13c4f8
commit
430663bc89
1 changed files with 3 additions and 2 deletions
|
|
@ -1061,6 +1061,7 @@ The following variables may be of some use. Try
|
|||
The following key bindings are currently in effect in the buffer:
|
||||
\\{Man-mode-map}"
|
||||
(interactive)
|
||||
(kill-all-local-variables)
|
||||
(setq major-mode 'Man-mode
|
||||
mode-name "Man"
|
||||
buffer-auto-save-file-name nil
|
||||
|
|
@ -1069,7 +1070,7 @@ The following key bindings are currently in effect in the buffer:
|
|||
" {" 'Man-page-mode-string "}")
|
||||
truncate-lines t
|
||||
buffer-read-only t)
|
||||
(buffer-disable-undo (current-buffer))
|
||||
(buffer-disable-undo)
|
||||
(auto-fill-mode -1)
|
||||
(use-local-map Man-mode-map)
|
||||
(set-syntax-table man-mode-syntax-table)
|
||||
|
|
@ -1080,7 +1081,7 @@ The following key bindings are currently in effect in the buffer:
|
|||
(Man-strip-page-headers)
|
||||
(Man-unindent)
|
||||
(Man-goto-page 1)
|
||||
(run-hooks 'Man-mode-hook))
|
||||
(run-mode-hooks 'Man-mode-hook))
|
||||
|
||||
(defsubst Man-build-section-alist ()
|
||||
"Build the association list of manpage sections."
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue