diff options
| author | Dave Love | 2000-11-22 16:33:13 +0000 |
|---|---|---|
| committer | Dave Love | 2000-11-22 16:33:13 +0000 |
| commit | 0b8142fae2c08684572c1c603b47c80c0d9eb7df (patch) | |
| tree | 922207eb9126e523599797341595b510b93496ab | |
| parent | e2c556b4f78528f05b6d199116ea62d7829c396a (diff) | |
| download | emacs-0b8142fae2c08684572c1c603b47c80c0d9eb7df.tar.gz emacs-0b8142fae2c08684572c1c603b47c80c0d9eb7df.zip | |
2000-11-22 Simon Josefsson <simon@josefsson.org>
* gnus-uu.el (gnus-uu-digest-mail-forward): Search for "from:"
instead of "from: " for rfc822 compliance. Insert SPC.
| -rw-r--r-- | lisp/gnus/gnus-uu.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/gnus/gnus-uu.el b/lisp/gnus/gnus-uu.el index c1960f6057f..f4ff2ea154b 100644 --- a/lisp/gnus/gnus-uu.el +++ b/lisp/gnus/gnus-uu.el | |||
| @@ -561,9 +561,9 @@ didn't work, and overwrite existing files. Otherwise, ask each time." | |||
| 561 | (delete-region (point) (gnus-point-at-eol)) | 561 | (delete-region (point) (gnus-point-at-eol)) |
| 562 | (insert subject)) | 562 | (insert subject)) |
| 563 | (goto-char (point-min)) | 563 | (goto-char (point-min)) |
| 564 | (when (re-search-forward "^From: ") | 564 | (when (re-search-forward "^From:") |
| 565 | (delete-region (point) (gnus-point-at-eol)) | 565 | (delete-region (point) (gnus-point-at-eol)) |
| 566 | (insert from)) | 566 | (insert " " from)) |
| 567 | (message-forward post t)) | 567 | (message-forward post t)) |
| 568 | (setq gnus-uu-digest-from-subject nil))) | 568 | (setq gnus-uu-digest-from-subject nil))) |
| 569 | 569 | ||