281 |
"If non-nil, Gnus tries to suggest a default address to resend to. |
"If non-nil, Gnus tries to suggest a default address to resend to. |
282 |
If nil, the address field will always be empty after invoking |
If nil, the address field will always be empty after invoking |
283 |
`gnus-summary-resend-message'." |
`gnus-summary-resend-message'." |
284 |
|
:version "21.4" |
285 |
:group 'gnus-message |
:group 'gnus-message |
286 |
:type 'boolean) |
:type 'boolean) |
287 |
|
|
1872 |
(setq v (with-temp-buffer |
(setq v (with-temp-buffer |
1873 |
(insert-file-contents v) |
(insert-file-contents v) |
1874 |
(goto-char (point-max)) |
(goto-char (point-max)) |
1875 |
(while (bolp) |
(skip-chars-backward "\n") |
1876 |
(delete-char -1)) |
(delete-region (+ (point) (if (bolp) 0 1)) |
1877 |
|
(point-max)) |
1878 |
(buffer-string)))) |
(buffer-string)))) |
1879 |
(setq results (delq (assoc element results) results)) |
(setq results (delq (assoc element results) results)) |
1880 |
(push (cons element v) results)))) |
(push (cons element v) results)))) |