# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 1020863637 0
# Node ID b9324402ed2f256ba4b8ef3b10bdab8e933e98b2
# Parent  6ff2c20da16e5985e86d0f6863f9eab77618af73
(msb-menu-bar-update-buffers): Fixed frame menu to use
the frame name as the car of a menu entry, rather than the frame.

diff -r 6ff2c20da16e -r b9324402ed2f lisp/msb.el
--- a/lisp/msb.el	Wed May 08 13:13:41 2002 +0000
+++ b/lisp/msb.el	Wed May 08 13:13:57 2002 +0000
@@ -1114,9 +1114,8 @@
 		 (mapcar
 		  (lambda (frame)
 		    (nconc
-		     (list frame
-			   (cdr (assq 'name
-				      (frame-parameters frame)))
+		     (list (frame-parameter frame 'name)
+			   (frame-parameter frame 'name)
 			   (cons nil nil))
 		     'menu-bar-select-frame))
 		  frames)))))