diff options
| author | Lars Ingebrigtsen | 2021-01-29 08:34:43 +0100 |
|---|---|---|
| committer | Lars Ingebrigtsen | 2021-01-30 06:58:49 +0100 |
| commit | 90ce2b80342299ef4c6c2f6b08cca55e20ffa06b (patch) | |
| tree | 6418dca7abc1835b59e6e40c688bf67a88dd376f | |
| parent | bbad7904e20ba0366a3397a45fb89de0275bbf28 (diff) | |
| download | emacs-90ce2b80342299ef4c6c2f6b08cca55e20ffa06b.tar.gz emacs-90ce2b80342299ef4c6c2f6b08cca55e20ffa06b.zip | |
rmail-summary-mark-deleted optional argument fix
* lisp/mail/rmailsum.el (rmail-summary-mark-deleted): Argument N
is optional, so don't assume that it's a number (bug#39076).
| -rw-r--r-- | lisp/mail/rmailsum.el | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/mail/rmailsum.el b/lisp/mail/rmailsum.el index d29115a9570..7f99ecdcf2c 100644 --- a/lisp/mail/rmailsum.el +++ b/lisp/mail/rmailsum.el | |||
| @@ -974,8 +974,9 @@ a negative argument means to delete and move forward." | |||
| 974 | (delete-char 1) | 974 | (delete-char 1) |
| 975 | (insert "D")) | 975 | (insert "D")) |
| 976 | ;; Discard cached new summary line. | 976 | ;; Discard cached new summary line. |
| 977 | (with-current-buffer rmail-buffer | 977 | (when n |
| 978 | (aset rmail-summary-vector (1- n) nil)))) | 978 | (with-current-buffer rmail-buffer |
| 979 | (aset rmail-summary-vector (1- n) nil))))) | ||
| 979 | (beginning-of-line)) | 980 | (beginning-of-line)) |
| 980 | 981 | ||
| 981 | (defun rmail-summary-update-line (n) | 982 | (defun rmail-summary-update-line (n) |