diff options
| author | Richard M. Stallman | 1995-04-25 03:35:00 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1995-04-25 03:35:00 +0000 |
| commit | 5313d5f1efbb3088851ac25bb6057b6c0a9eba4e (patch) | |
| tree | 95dcb6691fdab426a5321974540ddd794d9f7884 | |
| parent | dc84b03da7d8059078e373b33d444b44a0dc7b73 (diff) | |
| download | emacs-5313d5f1efbb3088851ac25bb6057b6c0a9eba4e.tar.gz emacs-5313d5f1efbb3088851ac25bb6057b6c0a9eba4e.zip | |
(mail-position-on-field): Use $, not \n, in regexp.
| -rw-r--r-- | lisp/mail/sendmail.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el index 15280f84aa9..2ea6d676d53 100644 --- a/lisp/mail/sendmail.el +++ b/lisp/mail/sendmail.el | |||
| @@ -753,7 +753,7 @@ the user from the mailer." | |||
| 753 | (let (end | 753 | (let (end |
| 754 | (case-fold-search t)) | 754 | (case-fold-search t)) |
| 755 | (goto-char (point-min)) | 755 | (goto-char (point-min)) |
| 756 | (re-search-forward (concat "^" (regexp-quote mail-header-separator) "\n")) | 756 | (re-search-forward (concat "^" (regexp-quote mail-header-separator) "$")) |
| 757 | (setq end (match-beginning 0)) | 757 | (setq end (match-beginning 0)) |
| 758 | (goto-char (point-min)) | 758 | (goto-char (point-min)) |
| 759 | (if (re-search-forward (concat "^" (regexp-quote field) ":") end t) | 759 | (if (re-search-forward (concat "^" (regexp-quote field) ":") end t) |