Mercurial > emacs

changeset 7745:7259e377c81f

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(menu-bar-mode): Fix previous change.
author Richard M. Stallman <rms@gnu.org>
date Mon, 30 May 1994 09:15:53 +0000
parents da18793f532d
children abd7e801de63
files lisp/menu-bar.el
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/menu-bar.el	Mon May 30 09:14:39 1994 +0000
+++ b/lisp/menu-bar.el	Mon May 30 09:15:53 1994 +0000
@@ -416,7 +416,7 @@
    ;; Apply it to existing frames.
    (let ((frames (frame-list)))
      (while frames
-       (let ((height (cdr (assq 'height (frame-parameters (selected-frame))))))
+       (let ((height (cdr (assq 'height (frame-parameters (car frames))))))
 	 (modify-frame-parameters (car frames)
 				  (list (cons 'menu-bar-lines
 					    (if menu-bar-mode 1 0))))