(mail-send-and-exit): Make arg optional.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index af6a7cc1a945a9bb3f2c20511c76889dbd37e7e1..f360d750c2161cd70505b1166599795da3ba0179 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2003-04-23  Richard M. Stallman  <rms@gnu.org>
 
+       * mail/sendmail.el (mail-send-and-exit): Make arg optional.
+
        * files.el (view-read-only): Doc fix.
 
        * simple.el (back-to-indentation): Call backward-prefix-chars.

diff --git a/lisp/mail/sendmail.el b/lisp/mail/sendmail.el
index 40ef9e872288f7d0374afefc6218754db8211a26..7ce31eaeb47825efa8124f5e6ee238cff58b485c 100644 (file)
--- a/lisp/mail/sendmail.el
+++ b/lisp/mail/sendmail.el
@@ -686,7 +686,7 @@ If within the headers, this makes the new lines into continuation lines."
 \f
 ;; User-level commands for sending.
 
-(defun mail-send-and-exit (arg)
+(defun mail-send-and-exit (&optional arg)
   "Send message like `mail-send', then, if no errors, exit from mail buffer.
 Prefix arg means don't delete this window."
   (interactive "P")