diff options
author | Jim Blandy <jimb@redhat.com> | 1993-06-11 11:33:31 +0000 |
---|---|---|
committer | Jim Blandy <jimb@redhat.com> | 1993-06-11 11:33:31 +0000 |
commit | 72490652c201045626ba3363a6ff5cdb5e132ab1 (patch) | |
tree | f10033be19cfbadc75b70382022f4e8f0fb4f564 /lisp/frame.el | |
parent | 8b677dc23e5be138beac4fadd6e85e424c2bfe8b (diff) | |
download | emacs-72490652c201045626ba3363a6ff5cdb5e132ab1.tar.gz |
* frame.el (frame-initialize): Remember to actually traverse
initial-frame-alist.
Diffstat (limited to 'lisp/frame.el')
-rw-r--r-- | lisp/frame.el | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/frame.el b/lisp/frame.el index 6abf8126032..b7553517240 100644 --- a/lisp/frame.el +++ b/lisp/frame.el @@ -108,7 +108,8 @@ These supersede the values given in `default-frame-alist'.") (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) |