# HG changeset patch
# User Chong Yidong <cyd@stupidchicken.com>
# Date 1157292817 0
# Node ID b09d9bab18595b6c8b206be55701130a9bfc2576
# Parent  62dbeb7871a277ea98b3e1fe67535a12634108a0
	* cus-edit.el (custom-group-menu-create): Avoid deactivating the
	mark after running the menu filter.

diff -r 62dbeb7871a2 -r b09d9bab1859 lisp/ChangeLog
--- a/lisp/ChangeLog	Sun Sep 03 14:01:01 2006 +0000
+++ b/lisp/ChangeLog	Sun Sep 03 14:13:37 2006 +0000
@@ -1,3 +1,8 @@
+2006-09-03  Chong Yidong  <cyd@stupidchicken.com>
+
+	* cus-edit.el (custom-group-menu-create): Avoid deactivating the
+	mark after running the menu filter.
+
 2006-09-03  Juri Linkov  <juri@jurta.org>
 
 	* international/quail.el (quail-defrule-internal): Add a check
diff -r 62dbeb7871a2 -r b09d9bab1859 lisp/cus-edit.el
--- 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