aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/cus-edit.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/cus-edit.el')
-rw-r--r--lisp/cus-edit.el21
1 files changed, 10 insertions, 11 deletions
diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el
index 40d1e2ffdfb..3f2dcd20ccc 100644
--- a/lisp/cus-edit.el
+++ b/lisp/cus-edit.el
@@ -4655,17 +4655,16 @@ Entry to this mode calls the value of `Custom-mode-hook'
4655if that value is non-nil." 4655if that value is non-nil."
4656 (use-local-map custom-mode-map) 4656 (use-local-map custom-mode-map)
4657 (easy-menu-add Custom-mode-menu) 4657 (easy-menu-add Custom-mode-menu)
4658 (when (display-graphic-p) 4658 (set (make-local-variable 'tool-bar-map)
4659 (set (make-local-variable 'tool-bar-map) 4659 (or custom-tool-bar-map
4660 (or custom-tool-bar-map 4660 ;; Set up `custom-tool-bar-map'.
4661 ;; Set up `custom-tool-bar-map'. 4661 (let ((map (make-sparse-keymap)))
4662 (let ((map (make-sparse-keymap))) 4662 (mapc
4663 (mapc 4663 (lambda (arg)
4664 (lambda (arg) 4664 (tool-bar-local-item-from-menu
4665 (tool-bar-local-item-from-menu 4665 (nth 1 arg) (nth 4 arg) map custom-mode-map))
4666 (nth 1 arg) (nth 4 arg) map custom-mode-map)) 4666 custom-commands)
4667 custom-commands) 4667 (setq custom-tool-bar-map map))))
4668 (setq custom-tool-bar-map map)))))
4669 (make-local-variable 'custom-options) 4668 (make-local-variable 'custom-options)
4670 (make-local-variable 'custom-local-buffer) 4669 (make-local-variable 'custom-local-buffer)
4671 (make-local-variable 'widget-documentation-face) 4670 (make-local-variable 'widget-documentation-face)