Mercurial > emacs

changeset 3647:cf5972f69f8a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
* frame.el (frame-initialize): Remember to actually traverse initial-frame-alist.
author Jim Blandy <jimb@redhat.com>
date Fri, 11 Jun 1993 11:33:31 +0000
parents 4b34cbec2058
children 9838d64cc5ae
files lisp/frame.el
diffstat 1 files changed, 2 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/frame.el	Fri Jun 11 11:28:28 1993 +0000
+++ b/lisp/frame.el	Fri Jun 11 11:33:31 1993 +0000
@@ -108,7 +108,8 @@
 		  (if (and (consp (car tail))
 			   (memq (car (car tail)) '(height width top left)))
 		      (setq initial-frame-alist
-			    (delq tail initial-frame-alist)))))
+			    (delq tail initial-frame-alist)))
+		  (setq tail (cdr tail))))
 	      ;; Handle `reverse' as a parameter.
 	      (if (cdr (or (assq 'reverse initial-frame-alist)
 			   (assq 'reverse default-frame-alist)