diff options
author | Richard M. Stallman <rms@gnu.org> | 1997-05-19 01:05:13 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1997-05-19 01:05:13 +0000 |
commit | ecb4dd9a350f1f36aca706d03f7cc1a9d50b5b23 (patch) | |
tree | 8532c55c90cdc6d16565bc25e99efefbffa9e0f1 /lisp/mail/rmailsum.el | |
parent | 58856335864a1dc5b56402d54cd8ef04e3082178 (diff) | |
download | emacs-ecb4dd9a350f1f36aca706d03f7cc1a9d50b5b23.tar.gz |
(rmail-summary-delete-forward): Force the
argument to be a number, since we may be called with nil.
Diffstat (limited to 'lisp/mail/rmailsum.el')
-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) |