diff options
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/mail/rmailsum.el | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/mail/rmailsum.el b/lisp/mail/rmailsum.el index 4a7dd67b082..6081062dde6 100644 --- a/lisp/mail/rmailsum.el +++ b/lisp/mail/rmailsum.el @@ -582,6 +582,7 @@ Deleted messages stay in the file until the \\[rmail-expunge] command is given. A prefix argument serves as a repeat count; a negative argument means to delete and move backward." (interactive "p") + (unless (numberp count) (setq count 1)) (let (end del-msg (backward (< count 0))) (while (/= count 0) |