From b1674d6103add2a26b00766f09600ced9a0f2c4b Mon Sep 17 00:00:00 2001 From: Chong Yidong Date: Sun, 3 Sep 2006 14:13:37 +0000 Subject: [PATCH] * cus-edit.el (custom-group-menu-create): Avoid deactivating the mark after running the menu filter. --- lisp/ChangeLog | 5 +++++ lisp/cus-edit.el | 3 ++- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/lisp/ChangeLog b/lisp/ChangeLog index cd606e8f4da..8712304b363 100644 --- a/lisp/ChangeLog +++ b/lisp/ChangeLog @@ -1,3 +1,8 @@ +2006-09-03 Chong Yidong + + * cus-edit.el (custom-group-menu-create): Avoid deactivating the + mark after running the menu filter. + 2006-09-03 Juri Linkov * international/quail.el (quail-defrule-internal): Add a check diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el index e3c92d59b00..c31e319f798 100644 --- a/lisp/cus-edit.el +++ b/lisp/cus-edit.el @@ -4395,7 +4395,8 @@ This function does not save the buffer." "Ignoring WIDGET, create a menu entry for customization group SYMBOL." `( ,(custom-unlispify-menu-entry symbol t) :filter (lambda (&rest junk) - (let ((menu (custom-menu-create ',symbol))) + (let* ((deactivate-mark nil) + (menu (custom-menu-create ',symbol))) (if (consp menu) (cdr menu) menu))))) ;;;###autoload -- 2.39.2