Mercurial > emacs

diff lisp/menu-bar.el @ 7239:385ac6718f28

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(menu-bar-update-buffers): Fix misspelled variable.
author Karl Heuer <kwzh@gnu.org>
date Sun, 01 May 1994 01:56:10 +0000
parents b642c8ba8ea3
children 01a3412f53dd
line wrap: on
line diff
--- a/lisp/menu-bar.el	Sat Apr 30 23:28:10 1994 +0000
+++ b/lisp/menu-bar.el	Sun May 01 01:56:10 1994 +0000
@@ -334,8 +334,9 @@
 						"List All Buffers")
 					'list-buffers)))))))
 
+
       ;; Make a Frames menu if we have more than one frame.
-      (if (cdr frame)
+      (if (cdr frames)
 	  (setq frames-menu
 		(cons "Select Frame"
 		      (mapcar '(lambda (frame)
@@ -344,7 +345,7 @@
 							 (frame-parameters frame)))
 					      (cons nil nil))
 					'menu-bar-select-frame))
-			      frame))))
+			      frames))))
       (if buffers-menu
 	  (setq buffers-menu (cons 'keymap buffers-menu)))
       (if frames-menu