# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 822601687 0
# Node ID 54024c0084b8a7b3f6e6b3631ec9b5db36a01545
# Parent  8d779463ec366a44b5c7c3eae405fe52a038b665
(rmail-start-mail): Set mail-dedicated-frame frame param.

diff -r 8d779463ec36 -r 54024c0084b8 lisp/mail/rmail.el
--- a/lisp/mail/rmail.el	Thu Jan 25 20:27:45 1996 +0000
+++ b/lisp/mail/rmail.el	Thu Jan 25 20:28:07 1996 +0000
@@ -2053,8 +2053,10 @@
   (if (and window-system rmail-mail-new-frame)
       (prog1
 	(apply 'mail-other-frame args)
+	;; This is not a standard frame parameter;
+	;; nothing except sendmail.el looks at it.
 	(modify-frame-parameters (selected-frame)
-				 '((dedicated . t))))
+				 '((mail-dedicated-frame . t))))
     (apply 'mail-other-window args)))
 
 (defun rmail-mail ()