diff options
-rw-r--r-- | lisp/obsolete/ooutline.el | 2 | ||||
-rw-r--r-- | lisp/obsolete/options.el | 2 | ||||
-rw-r--r-- | lisp/obsolete/rnews.el | 2 | ||||
-rw-r--r-- | lisp/obsolete/rnewspost.el | 2 |
4 files changed, 4 insertions, 4 deletions
diff --git a/lisp/obsolete/ooutline.el b/lisp/obsolete/ooutline.el index 6b595b86297..0218d097b64 100644 --- a/lisp/obsolete/ooutline.el +++ b/lisp/obsolete/ooutline.el @@ -224,7 +224,7 @@ Turning on outline mode calls the value of `text-mode-hook' and then of (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. diff --git a/lisp/obsolete/options.el b/lisp/obsolete/options.el index 34d7e532d1a..5ea14678d0b 100644 --- a/lisp/obsolete/options.el +++ b/lisp/obsolete/options.el @@ -109,7 +109,7 @@ For convenience, the characters \\[backward-paragraph] and \\[forward-paragraph] (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 diff --git a/lisp/obsolete/rnews.el b/lisp/obsolete/rnews.el index cb2ed034ffc..7a546aa3081 100644 --- a/lisp/obsolete/rnews.el +++ b/lisp/obsolete/rnews.el @@ -375,7 +375,7 @@ U unsubscribe from specified newsgroup." (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) diff --git a/lisp/obsolete/rnewspost.el b/lisp/obsolete/rnewspost.el index 1b7623f78ae..e1a378c6fb6 100644 --- a/lisp/obsolete/rnewspost.el +++ b/lisp/obsolete/rnewspost.el @@ -130,7 +130,7 @@ C-c C-r caesar rotate all letters by 13 places in the article's body (rot13)." (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'.") |