From c0550168f3adb785fe600bccbfe4ce05deb931a7 Mon Sep 17 00:00:00 2001 From: Bozhidar Batsov Date: Mon, 26 May 2014 19:02:46 +0300 Subject: [PATCH] Define a few keybindings in terms of help-command --- core/prelude-global-keybindings.el | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/core/prelude-global-keybindings.el b/core/prelude-global-keybindings.el index 88292a8..dbdcf98 100644 --- a/core/prelude-global-keybindings.el +++ b/core/prelude-global-keybindings.el @@ -65,10 +65,10 @@ ;; A complementary binding to the apropos-command (C-h a) (define-key 'help-command "A" 'apropos) -(global-set-key (kbd "C-h C-f") 'find-function) -(global-set-key (kbd "C-h C-k") 'find-function-on-key) -(global-set-key (kbd "C-h C-v") 'find-variable) -(global-set-key (kbd "C-h C-l") 'find-library) +(define-key 'help-command (kbd "C-f") 'find-function) +(define-key 'help-command (kbd "C-k") 'find-function-on-key) +(define-key 'help-command (kbd "C-v") 'find-variable) +(define-key 'help-command (kbd "C-l") 'find-library) ;; a complement to the zap-to-char command, that doesn't eat up the target character (autoload 'zap-up-to-char "misc" "Kill up to, but not including ARGth occurrence of CHAR.")