*** emacs/lisp/mail/smtpmail.el	Tue Feb  4 19:57:48 2003
--- smtpmail.el	Wed May  7 03:31:19 2003
***************
*** 404,410 ****
  	    (error "Sending failed; no recipients")))
  	(delete-file file-msg)
  	(delete-file (concat file-msg ".el"))
! 	(kill-line 1))
        (write-region (point-min) (point-max) smtpmail-queue-index))))
  
  ;(defun smtpmail-via-smtp (host,port,sender,destination,smtpmail-text-buffer)
--- 404,410 ----
  	    (error "Sending failed; no recipients")))
  	(delete-file file-msg)
  	(delete-file (concat file-msg ".el"))
! 	(delete-region (point-at-bol) (progn (forward-line 1) (point))))
        (write-region (point-min) (point-max) smtpmail-queue-index))))
  
  ;(defun smtpmail-via-smtp (host,port,sender,destination,smtpmail-text-buffer)