aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/menu-bar.el
diff options
context:
space:
mode:
authorKarl Heuer <[email protected]>1994-03-24 20:46:49 +0000
committerKarl Heuer <[email protected]>1994-03-24 20:46:49 +0000
commitea0633d410bd39bf288c6519b42ae70f2fd30154 (patch)
treeed1ba4b7aeee5739882ef86f3a7e52858b53358a /lisp/menu-bar.el
parent1fe3d50701adcd8929745edf24158a4a50459ea0 (diff)
(mouse-menu-bar-buffers): Fix position structure.
Diffstat (limited to 'lisp/menu-bar.el')
-rw-r--r--lisp/menu-bar.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/menu-bar.el b/lisp/menu-bar.el
index bf1ddcbc35..ea6221ca71 100644
--- a/lisp/menu-bar.el
+++ b/lisp/menu-bar.el
@@ -267,7 +267,7 @@ and selects that window."
(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 @@ and selects that window."
(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)