changeset 12220:4f42575780e6

(frame-notice-user-settings): When making a minibufferless frame, don't copy `name' parm explicitly unless it was explicit before.
author Richard M. Stallman <rms@gnu.org>
date Wed, 14 Jun 1995 16:16:04 +0000
parents 7c0b93d3df6b
children 2fb3fef43166
files lisp/frame.el
diffstat 1 files changed, 5 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/frame.el	Wed Jun 14 15:47:10 1995 +0000
+++ b/lisp/frame.el	Wed Jun 14 16:16:04 1995 +0000
@@ -246,9 +246,13 @@
 	      (while (not (cdr (assq 'visibility
 				     (frame-parameters frame-initial-frame))))
 		(sleep-for 1))
+	      (setq parms (frame-parameters frame-initial-frame))
+	      ;; Get rid of `name' unless it was specified explicitly before.
+	      (or (assq 'name frame-initial-frame-alist)
+		  (setq parms (delq (assq 'name parms) parms)))
 	      (setq parms (append initial-frame-alist
 				  default-frame-alist
-				  (frame-parameters frame-initial-frame)
+				  parms
 				  nil))
 	      ;; Get rid of `reverse', because that was handled
 	      ;; when we first made the frame.