Mercurial > emacs
diff lisp/cus-edit.el @ 72629:b09d9bab1859
* cus-edit.el (custom-group-menu-create): Avoid deactivating the
mark after running the menu filter.
| author | Chong Yidong <cyd@stupidchicken.com> |
|---|---|
| date | Sun, 03 Sep 2006 14:13:37 +0000 |
| parents | 97860dfadca5 |
| children | b51738f67f62 c358d0861b16 |
line wrap: on
line diff
--- a/lisp/cus-edit.el Sun Sep 03 14:01:01 2006 +0000 +++ b/lisp/cus-edit.el Sun Sep 03 14:13:37 2006 +0000 @@ -4395,7 +4395,8 @@ "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