comparison lisp/mail/rnewspost.el @ 11769:4b5452f8ad12

(news-reply-mode): Add ^ to paragraph delimiters.
author Richard M. Stallman <rms@gnu.org>
date Tue, 09 May 1995 04:07:15 +0000
parents 329197fc1477
children 187735b53d52
comparison
equal deleted inserted replaced
11768:8f49fc89adcc 11769:4b5452f8ad12
129 (setq local-abbrev-table text-mode-abbrev-table) 129 (setq local-abbrev-table text-mode-abbrev-table)
130 (setq major-mode 'news-reply-mode) 130 (setq major-mode 'news-reply-mode)
131 (setq mode-name "News Reply") 131 (setq mode-name "News Reply")
132 (make-local-variable 'paragraph-separate) 132 (make-local-variable 'paragraph-separate)
133 (make-local-variable 'paragraph-start) 133 (make-local-variable 'paragraph-start)
134 (setq paragraph-start (concat (regexp-quote mail-header-separator) "$\\|" 134 (setq paragraph-start
135 paragraph-start)) 135 (concat "^" (regexp-quote mail-header-separator) "$\\|"
136 (setq paragraph-separate (concat (regexp-quote mail-header-separator) "$\\|" 136 paragraph-start))
137 paragraph-separate)) 137 (setq paragraph-separate
138 (concat "^" (regexp-quote mail-header-separator) "$\\|"
139 paragraph-separate))
138 (run-hooks 'text-mode-hook 'news-reply-mode-hook)) 140 (run-hooks 'text-mode-hook 'news-reply-mode-hook))
139 141
140 (defvar news-reply-yank-from 142 (defvar news-reply-yank-from
141 "Save `From:' field for `news-reply-yank-original'." 143 "Save `From:' field for `news-reply-yank-original'."
142 "") 144 "")