Mercurial > emacs
comparison lisp/gnus/score-mode.el @ 62750:a96e31f51315
(gnus-score-mode): Use run-mode-hooks.
author | Lute Kamstra <lute@gnu.org> |
---|---|
date | Thu, 26 May 2005 13:32:44 +0000 |
parents | 55fd4f77387a |
children | a03b1bd1f66c |
comparison
equal
deleted
inserted
replaced
62749:3848ecb8352f | 62750:a96e31f51315 |
---|---|
69 (set-syntax-table score-mode-syntax-table) | 69 (set-syntax-table score-mode-syntax-table) |
70 (setq major-mode 'gnus-score-mode) | 70 (setq major-mode 'gnus-score-mode) |
71 (setq mode-name "Score") | 71 (setq mode-name "Score") |
72 (lisp-mode-variables nil) | 72 (lisp-mode-variables nil) |
73 (make-local-variable 'gnus-score-edit-exit-function) | 73 (make-local-variable 'gnus-score-edit-exit-function) |
74 (run-hooks 'emacs-lisp-mode-hook 'gnus-score-mode-hook)) | 74 (run-mode-hooks 'emacs-lisp-mode-hook 'gnus-score-mode-hook)) |
75 | 75 |
76 (defun gnus-score-make-menu-bar () | 76 (defun gnus-score-make-menu-bar () |
77 (unless (boundp 'gnus-score-menu) | 77 (unless (boundp 'gnus-score-menu) |
78 (easy-menu-define | 78 (easy-menu-define |
79 gnus-score-menu gnus-score-mode-map "" | 79 gnus-score-menu gnus-score-mode-map "" |