diff options
| author | Gerd Moellmann | 2000-12-12 14:52:36 +0000 |
|---|---|---|
| committer | Gerd Moellmann | 2000-12-12 14:52:36 +0000 |
| commit | 09cefa66eea8ff0dd30ec0258588633866b83b85 (patch) | |
| tree | dea13374fce3e7ad730b67d3f60479e45a0bea57 | |
| parent | 4fdbd80975823359d50d109f872dba8e1f8d0857 (diff) | |
| download | emacs-09cefa66eea8ff0dd30ec0258588633866b83b85.tar.gz emacs-09cefa66eea8ff0dd30ec0258588633866b83b85.zip | |
(rmail-summary-expunge)
(rmail-summary-expunge-and-save): Use rmail-expunge-confirmed
instead of rmail-confirm-expunge.
| -rw-r--r-- | lisp/mail/rmailsum.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/mail/rmailsum.el b/lisp/mail/rmailsum.el index 3069142ede0..7a5304da6f4 100644 --- a/lisp/mail/rmailsum.el +++ b/lisp/mail/rmailsum.el | |||
| @@ -1210,7 +1210,7 @@ move to the previous message." | |||
| 1210 | (interactive) | 1210 | (interactive) |
| 1211 | (save-excursion | 1211 | (save-excursion |
| 1212 | (set-buffer rmail-buffer) | 1212 | (set-buffer rmail-buffer) |
| 1213 | (when (rmail-confirm-expunge) | 1213 | (when (rmail-expunge-confirmed) |
| 1214 | (rmail-only-expunge))) | 1214 | (rmail-only-expunge))) |
| 1215 | (rmail-update-summary)) | 1215 | (rmail-update-summary)) |
| 1216 | 1216 | ||
| @@ -1219,7 +1219,7 @@ move to the previous message." | |||
| 1219 | (interactive) | 1219 | (interactive) |
| 1220 | (save-excursion | 1220 | (save-excursion |
| 1221 | (set-buffer rmail-buffer) | 1221 | (set-buffer rmail-buffer) |
| 1222 | (when (rmail-confirm-expunge) | 1222 | (when (rmail-expunge-confirmed) |
| 1223 | (rmail-only-expunge))) | 1223 | (rmail-only-expunge))) |
| 1224 | (rmail-update-summary) | 1224 | (rmail-update-summary) |
| 1225 | (save-excursion | 1225 | (save-excursion |