From 122e29ded4b5a503639a00f643e9778a3bcaeffa Mon Sep 17 00:00:00 2001 From: Chong Yidong Date: Sun, 28 May 2006 03:58:47 +0000 Subject: [PATCH] * msb.el (mouse-select-buffer): Minor fix to make popup menu work with no X toolkit. --- lisp/ChangeLog | 5 +++++ lisp/msb.el | 2 +- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index a26ff639b93..8e2edd4f83f 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2006-05-27 Chong Yidong + + * msb.el (mouse-select-buffer): Minor fix to make popup menu work + with no X toolkit. + 2006-05-28 Nick Roberts * tumme.el (tumme-show-all-from-dir-max-files): Fix typo. diff --git a/lisp/msb.el b/lisp/msb.el index 61ddce5dae0..d5f32486971 100644 --- a/lisp/msb.el +++ b/lisp/msb.el @@ -1007,7 +1007,7 @@ variable `msb-menu-cond'." (mouse-select-buffer event)) ((and (numberp (car choice)) (null (cdr choice))) - (let ((msb--last-buffer-menu (nthcdr 3 (assq (car choice) + (let ((msb--last-buffer-menu (nthcdr 2 (assq (car choice) msb--last-buffer-menu)))) (mouse-select-buffer event))) ((while (numberp (car choice)) -- 2.39.5