Mercurial > emacs
changeset 62769:a1fa16a75bde
* obsolete/ooutline.el (outline-mode):
* obsolete/options.el (Edit-options-mode):
* obsolete/rnews.el (news-mode):
* obsolete/rnewspost.el (news-reply-mode): Use run-mode-hooks.
| author | Lute Kamstra <lute@gnu.org> |
|---|---|
| date | Thu, 26 May 2005 15:24:51 +0000 |
| parents | a58b7c623705 |
| children | 93e71f3dcd14 |
| files | lisp/obsolete/ooutline.el lisp/obsolete/options.el lisp/obsolete/rnews.el lisp/obsolete/rnewspost.el |
| diffstat | 4 files changed, 4 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/obsolete/ooutline.el Thu May 26 15:23:59 2005 +0000 +++ b/lisp/obsolete/ooutline.el Thu May 26 15:24:51 2005 +0000 @@ -224,7 +224,7 @@ (setq font-lock-defaults '(outline-font-lock-keywords t)) (make-local-variable 'change-major-mode-hook) (add-hook 'change-major-mode-hook 'show-all) - (run-hooks 'text-mode-hook 'outline-mode-hook)) + (run-mode-hooks 'text-mode-hook 'outline-mode-hook)) (defcustom outline-minor-mode-prefix "\C-c@" "*Prefix key to use for Outline commands in Outline minor mode.
--- a/lisp/obsolete/options.el Thu May 26 15:23:59 2005 +0000 +++ b/lisp/obsolete/options.el Thu May 26 15:24:51 2005 +0000 @@ -109,7 +109,7 @@ (setq truncate-lines t) (setq major-mode 'Edit-options-mode) (setq mode-name "Options") - (run-hooks 'Edit-options-mode-hook)) + (run-mode-hooks 'Edit-options-mode-hook)) (defun Edit-options-set () (interactive) (Edit-options-modify
--- a/lisp/obsolete/rnews.el Thu May 26 15:23:59 2005 +0000 +++ b/lisp/obsolete/rnews.el Thu May 26 15:24:51 2005 +0000 @@ -375,7 +375,7 @@ (set-syntax-table text-mode-syntax-table) (use-local-map news-mode-map) (setq local-abbrev-table text-mode-abbrev-table) - (run-hooks 'news-mode-hook)) + (run-mode-hooks 'news-mode-hook)) (defun string-subst-char (new old string) (let (index)
--- a/lisp/obsolete/rnewspost.el Thu May 26 15:23:59 2005 +0000 +++ b/lisp/obsolete/rnewspost.el Thu May 26 15:24:51 2005 +0000 @@ -130,7 +130,7 @@ (setq mode-name "News Reply") (make-local-variable 'paragraph-separate) (make-local-variable 'paragraph-start) - (run-hooks 'text-mode-hook 'news-reply-mode-hook)) + (run-mode-hooks 'text-mode-hook 'news-reply-mode-hook)) (defvar news-reply-yank-from "" "Save `From:' field for `news-reply-yank-original'.")