# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 864003913 0
# Node ID 4b87104dcbc7338d4525fa03c2d5b2c4d0ef0b5d
# Parent  7d458582345c7df3608e67fb9d4caf372a87ed2b
(rmail-summary-delete-forward): Force the
argument to be a number, since we may be called with nil.

diff -r 7d458582345c -r 4b87104dcbc7 lisp/mail/rmailsum.el
--- a/lisp/mail/rmailsum.el	Mon May 19 01:04:04 1997 +0000
+++ b/lisp/mail/rmailsum.el	Mon May 19 01:05:13 1997 +0000
@@ -582,6 +582,7 @@
 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)