diff options
| -rw-r--r-- | lisp/mail/rnewspost.el | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/lisp/mail/rnewspost.el b/lisp/mail/rnewspost.el index 8327fab3549..936e3e0edb3 100644 --- a/lisp/mail/rnewspost.el +++ b/lisp/mail/rnewspost.el | |||
| @@ -131,10 +131,12 @@ C-c C-r caesar rotate all letters by 13 places in the article's body (rot13)." | |||
| 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 |