Mercurial > emacs

changeset 6513:d4d36d1aa774

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(mouse-menu-bar-buffers): Fix position structure.
author Karl Heuer <kwzh@gnu.org>
date Thu, 24 Mar 1994 20:46:49 +0000
parents c79a6bf75daa
children 421a3ab4cb2e
files lisp/menu-bar.el
diffstat 1 files changed, 2 insertions(+), 2 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/menu-bar.el	Thu Mar 24 20:38:34 1994 +0000
+++ b/lisp/menu-bar.el	Thu Mar 24 20:46:49 1994 +0000
@@ -267,7 +267,7 @@
     (setq menu (cons "Buffer and Frame Menu" menu))
 
     (let ((buf (x-popup-menu (if (listp event) event
-			       (cons '(0 0) (selected-frame)))
+			       (list '(0 0) (selected-frame)))
 			     menu))
 	  (window (and (listp event) (posn-window (event-start event)))))
       (cond ((framep buf)
@@ -280,7 +280,7 @@
 	     (if complex-buffers-menu-p
 		 (let ((action (x-popup-menu
 				(if (listp event) event
-				  (cons '(0 0) (selected-frame)))
+				  (list '(0 0) (selected-frame)))
 				'("Buffer Action"
 				  (""
 				   ("Save Buffer" . save-buffer)