Mercurial > emacs

changeset 11485:72becffa4b21

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(frame-notice-user-settings): Don't respecify an old value which was nil and remains nil.
author Richard M. Stallman <rms@gnu.org>
date Tue, 18 Apr 1995 19:26:11 +0000
parents 6b9693d102b0
children fb7c3071c8f0
files lisp/frame.el
diffstat 1 files changed, 3 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/frame.el	Tue Apr 18 18:37:51 1995 +0000
+++ b/lisp/frame.el	Tue Apr 18 19:26:11 1995 +0000
@@ -344,10 +344,10 @@
 	    ;; manually.
 	    (while tail
 	      (let (newval oldval)
-		(setq oldval (cdr (assq (car (car tail))
-					frame-initial-frame-alist)))
+		(setq oldval (assq (car (car tail))
+				   frame-initial-frame-alist))
 		(setq newval (cdr (assq (car (car tail)) allparms)))
-		(or (eq oldval newval)
+		(or (and oldval (eq (cdr oldval) newval))
 		    (setq newparms
 			  (cons (cons (car (car tail)) newval) newparms))))
 	      (setq tail (cdr tail)))