aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorLute Kamstra2005-05-26 15:24:51 +0000
committerLute Kamstra2005-05-26 15:24:51 +0000
commite1c31ddba8d6832cee2fe0b565fa0414b91819b9 (patch)
treefb1e1ca877febf3114644bb6d431e1d25db636c2
parent57f9923ee76a501ac930a014197a3dd803028d3c (diff)
downloademacs-e1c31ddba8d6832cee2fe0b565fa0414b91819b9.tar.gz
emacs-e1c31ddba8d6832cee2fe0b565fa0414b91819b9.zip
* 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.
-rw-r--r--lisp/obsolete/ooutline.el2
-rw-r--r--lisp/obsolete/options.el2
-rw-r--r--lisp/obsolete/rnews.el2
-rw-r--r--lisp/obsolete/rnewspost.el2
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
224 (setq font-lock-defaults '(outline-font-lock-keywords t)) 224 (setq font-lock-defaults '(outline-font-lock-keywords t))
225 (make-local-variable 'change-major-mode-hook) 225 (make-local-variable 'change-major-mode-hook)
226 (add-hook 'change-major-mode-hook 'show-all) 226 (add-hook 'change-major-mode-hook 'show-all)
227 (run-hooks 'text-mode-hook 'outline-mode-hook)) 227 (run-mode-hooks 'text-mode-hook 'outline-mode-hook))
228 228
229(defcustom outline-minor-mode-prefix "\C-c@" 229(defcustom outline-minor-mode-prefix "\C-c@"
230 "*Prefix key to use for Outline commands in Outline minor mode. 230 "*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]
109 (setq truncate-lines t) 109 (setq truncate-lines t)
110 (setq major-mode 'Edit-options-mode) 110 (setq major-mode 'Edit-options-mode)
111 (setq mode-name "Options") 111 (setq mode-name "Options")
112 (run-hooks 'Edit-options-mode-hook)) 112 (run-mode-hooks 'Edit-options-mode-hook))
113 113
114(defun Edit-options-set () (interactive) 114(defun Edit-options-set () (interactive)
115 (Edit-options-modify 115 (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."
375 (set-syntax-table text-mode-syntax-table) 375 (set-syntax-table text-mode-syntax-table)
376 (use-local-map news-mode-map) 376 (use-local-map news-mode-map)
377 (setq local-abbrev-table text-mode-abbrev-table) 377 (setq local-abbrev-table text-mode-abbrev-table)
378 (run-hooks 'news-mode-hook)) 378 (run-mode-hooks 'news-mode-hook))
379 379
380(defun string-subst-char (new old string) 380(defun string-subst-char (new old string)
381 (let (index) 381 (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)."
130 (setq mode-name "News Reply") 130 (setq mode-name "News Reply")
131 (make-local-variable 'paragraph-separate) 131 (make-local-variable 'paragraph-separate)
132 (make-local-variable 'paragraph-start) 132 (make-local-variable 'paragraph-start)
133 (run-hooks 'text-mode-hook 'news-reply-mode-hook)) 133 (run-mode-hooks 'text-mode-hook 'news-reply-mode-hook))
134 134
135(defvar news-reply-yank-from "" 135(defvar news-reply-yank-from ""
136 "Save `From:' field for `news-reply-yank-original'.") 136 "Save `From:' field for `news-reply-yank-original'.")