diff options
| author | Juri Linkov | 2005-07-19 11:21:30 +0000 |
|---|---|---|
| committer | Juri Linkov | 2005-07-19 11:21:30 +0000 |
| commit | 91f48803794c045f84f871639847158ee7d212f2 (patch) | |
| tree | 20d241b2fe0665066875860d13ffdbc59688a1ef | |
| parent | dc035b803f81db13cf97e4243b7ff05e70cbb406 (diff) | |
| download | emacs-91f48803794c045f84f871639847158ee7d212f2.tar.gz emacs-91f48803794c045f84f871639847158ee7d212f2.zip | |
(custom-mode-map): Bind `C-c C-c' to `Custom-set'.
(Custom-mode-menu): Use `info' instead of `Info-goto-node'.
| -rw-r--r-- | lisp/cus-edit.el | 3 |
1 files changed, 2 insertions, 1 deletions
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'." | |||
| 4228 | (suppress-keymap map) | 4228 | (suppress-keymap map) |
| 4229 | (define-key map " " 'scroll-up) | 4229 | (define-key map " " 'scroll-up) |
| 4230 | (define-key map "\177" 'scroll-down) | 4230 | (define-key map "\177" 'scroll-down) |
| 4231 | (define-key map "\C-c\C-c" 'Custom-set) | ||
| 4231 | (define-key map "\C-x\C-s" 'Custom-save) | 4232 | (define-key map "\C-x\C-s" 'Custom-save) |
| 4232 | (define-key map "q" 'Custom-buffer-done) | 4233 | (define-key map "q" 'Custom-buffer-done) |
| 4233 | (define-key map "u" 'Custom-goto-parent) | 4234 | (define-key map "u" 'Custom-goto-parent) |
| @@ -4257,7 +4258,7 @@ The format is suitable for use with `easy-menu-define'." | |||
| 4257 | ["Reset to Current" Custom-reset-current t] | 4258 | ["Reset to Current" Custom-reset-current t] |
| 4258 | ["Reset to Saved" Custom-reset-saved t] | 4259 | ["Reset to Saved" Custom-reset-saved t] |
| 4259 | ["Reset to Standard Settings" Custom-reset-standard t] | 4260 | ["Reset to Standard Settings" Custom-reset-standard t] |
| 4260 | ["Info" (Info-goto-node "(emacs)Easy Customization") t])) | 4261 | ["Info" (info "(emacs)Easy Customization") t])) |
| 4261 | 4262 | ||
| 4262 | (defun Custom-goto-parent () | 4263 | (defun Custom-goto-parent () |
| 4263 | "Go to the parent group listed at the top of this buffer. | 4264 | "Go to the parent group listed at the top of this buffer. |