[Emacs-diffs] Changes to emacs/lisp/mail/sendmail.el [emacs-unicode-2]

[Miles Bader]

Index: emacs/lisp/mail/sendmail.el
diff -c emacs/lisp/mail/sendmail.el:1.269.2.2 
emacs/lisp/mail/sendmail.el:1.269.2.3
*** emacs/lisp/mail/sendmail.el:1.269.2.2       Fri Apr 16 12:50:31 2004
--- emacs/lisp/mail/sendmail.el Mon Jun 28 07:29:47 2004
***************
*** 714,720 ****
      (if (and (or (window-dedicated-p (frame-selected-window))
                 (cdr (assq 'mail-dedicated-frame (frame-parameters))))
             (not (null (delq (selected-frame) (visible-frame-list)))))
!       (delete-frame (selected-frame))
        (let (rmail-flag summary-buffer)
        (and (not arg)
             (not (one-window-p))
--- 714,725 ----
      (if (and (or (window-dedicated-p (frame-selected-window))
                 (cdr (assq 'mail-dedicated-frame (frame-parameters))))
             (not (null (delq (selected-frame) (visible-frame-list)))))
!       (progn
!         (if (display-multi-frame-p)
!             (delete-frame (selected-frame))
!           ;; The previous frame is where normally they have the
!           ;; RMAIL buffer displayed.
!           (other-frame -1)))
        (let (rmail-flag summary-buffer)
        (and (not arg)
             (not (one-window-p))