From: Richard M. Stallman Date: Mon, 10 Jun 1996 17:30:50 +0000 (+0000) Subject: (imenu--mouse-menu): Always use nested keymaps. X-Git-Tag: emacs-19.34~488 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=fdbf0fc7383b9f527bcb286fcba2fd8e6a713ab2;p=emacs.git (imenu--mouse-menu): Always use nested keymaps. (imenu-use-keymap-menu): Variable deleted. --- diff --git a/lisp/imenu.el b/lisp/imenu.el index e4af044db13..b555ba83b30 100644 --- a/lisp/imenu.el +++ b/lisp/imenu.el @@ -64,8 +64,6 @@ ;;; Customizable variables ;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; -(defvar imenu-use-keymap-menu nil - "*Non-nil means use a keymap when making the mouse menu.") (defvar imenu-auto-rescan nil "*Non-nil means Imenu should always rescan the buffers.") @@ -709,14 +707,10 @@ Returns t for rescan and otherwise a position number." index-alist) (or title (buffer-name)))) position) - (and imenu-use-keymap-menu - (setq menu (imenu--create-keymap-1 (car menu) - (if (< 1 (length (cdr menu))) - (cdr menu) - (cdr (cadr menu)))))) - - (or imenu-use-keymap-menu - (setq menu (list "Imenu" (delq nil menu)))) + (setq menu (imenu--create-keymap-1 (car menu) + (if (< 1 (length (cdr menu))) + (cdr menu) + (cdr (cadr menu))))) (setq position (x-popup-menu event menu)) (if imenu-use-keymap-menu (progn