Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
b1674d61
Commit
b1674d61
authored
Sep 03, 2006
by
Chong Yidong
Browse files
* cus-edit.el (custom-group-menu-create): Avoid deactivating the
mark after running the menu filter.
parent
35f111ba
Changes
2
Show whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
7 additions
and
1 deletion
+7
-1
lisp/ChangeLog
lisp/ChangeLog
+5
-0
lisp/cus-edit.el
lisp/cus-edit.el
+2
-1
No files found.
lisp/ChangeLog
View file @
b1674d61
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>
2006-09-03 Juri Linkov <juri@jurta.org>
* international/quail.el (quail-defrule-internal): Add a check
* international/quail.el (quail-defrule-internal): Add a check
...
...
lisp/cus-edit.el
View file @
b1674d61
...
@@ -4395,7 +4395,8 @@ This function does not save the buffer."
...
@@ -4395,7 +4395,8 @@ This function does not save the buffer."
"Ignoring WIDGET, create a menu entry for customization group SYMBOL."
"Ignoring WIDGET, create a menu entry for customization group SYMBOL."
`( ,(custom-unlispify-menu-entry symbol t)
`( ,(custom-unlispify-menu-entry symbol t)
:filter (lambda (&rest junk)
: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)))))
(if (consp menu) (cdr menu) menu)))))
;;;###autoload
;;;###autoload
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment