diff -rc pgnus-0.96.orig/lisp/ChangeLog pgnus-0.96/lisp/ChangeLog
*** pgnus-0.96.orig/lisp/ChangeLog	Fri Aug 27 15:17:01 1999
--- pgnus-0.96/lisp/ChangeLog	Fri Aug 27 19:59:35 1999
***************
*** 1,3 ****
--- 1,8 ----
+ 1999-08-27  Peter von der Ahé  <pahe@daimi.au.dk>
+ 
+ 	* message.el (message-send): More helpful error message if sending
+ 	fails
+ 
  Fri Aug 27 13:17:48 1999  Lars Magne Ingebrigtsen  <larsi@menja.ifi.uio.no>
  
  	* gnus.el: Pterodactyl Gnus v0.96 is released.
diff -rc pgnus-0.96.orig/lisp/message.el pgnus-0.96/lisp/message.el
*** pgnus-0.96.orig/lisp/message.el	Fri Aug 27 15:17:11 1999
--- pgnus-0.96/lisp/message.el	Fri Aug 27 19:56:22 1999
***************
*** 2010,2016 ****
  				(car elem))))
  			  (setq success (funcall (caddr elem) arg)))))
  	(setq sent t)))
!     (unless sent
        (error "No methods specified to send by"))
      (when (and success sent)
        (message-do-fcc)
--- 2010,2016 ----
  				(car elem))))
  			  (setq success (funcall (caddr elem) arg)))))
  	(setq sent t)))
!     (unless (or sent (not success))
        (error "No methods specified to send by"))
      (when (and success sent)
        (message-do-fcc)