(message-send-mail-with-sendmail): Improve error message.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index b7e966f..1075ae5 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2002-06-06  Simon Josefsson  <jas@extundo.com>
+
+       * message.el (message-send-mail-with-sendmail): Improve error message.
+
 2002-06-06  Kai Gro\e,b_\e(Bjohann  <Kai.Grossjohann@CS.Uni-Dortmund.DE>
 
        * message.el (message-interactive): Change default from nil to t.

diff --git a/lisp/message.el b/lisp/message.el
index 8d40f62..7fe95de 100644 (file)
--- a/lisp/message.el
+++ b/lisp/message.el
@@ -3018,7 +3018,7 @@ If you always want Gnus to send messages in one piece, set
                                (list resend-to-addresses)
                              '("-t"))))))
        (unless (or (null cpr) (zerop cpr))
-         (error "Sending...failed: %s" cpr))))
+         (error "Sending...failed with exit value %d" cpr))))
     (when message-interactive
       (save-excursion
        (set-buffer errbuf)