From: Juri Linkov <juri@jurta.org>
Date: Tue, 19 Jul 2005 11:21:30 +0000 (+0000)
Subject: (custom-mode-map): Bind `C-c C-c' to `Custom-set'.
X-Git-Tag: emacs-pretest-22.0.90~7998
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=91f48803794c045f84f871639847158ee7d212f2;p=emacs.git

(custom-mode-map): Bind `C-c C-c' to `Custom-set'.
(Custom-mode-menu): Use `info' instead of `Info-goto-node'.
---

diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el
index 5c3ff9448c0..4a3088e6f12 100644
--- a/lisp/cus-edit.el
+++ b/lisp/cus-edit.el
@@ -4228,6 +4228,7 @@ The format is suitable for use with `easy-menu-define'."
     (suppress-keymap map)
     (define-key map " " 'scroll-up)
     (define-key map "\177" 'scroll-down)
+    (define-key map "\C-c\C-c" 'Custom-set)
     (define-key map "\C-x\C-s" 'Custom-save)
     (define-key map "q" 'Custom-buffer-done)
     (define-key map "u" 'Custom-goto-parent)
@@ -4257,7 +4258,7 @@ The format is suitable for use with `easy-menu-define'."
     ["Reset to Current" Custom-reset-current t]
     ["Reset to Saved" Custom-reset-saved t]
     ["Reset to Standard Settings" Custom-reset-standard t]
-    ["Info" (Info-goto-node "(emacs)Easy Customization") t]))
+    ["Info" (info "(emacs)Easy Customization") t]))
 
 (defun Custom-goto-parent ()
   "Go to the parent group listed at the top of this buffer.