From 639cecb7595f565c623dc106c5f74ddfa9e987c9 Mon Sep 17 00:00:00 2001 From: toctan Date: Sun, 1 Jun 2014 13:27:47 +0800 Subject: [PATCH 1/2] Remove redundant helm-prelude key binding code --- core/prelude-mode.el | 1 - 1 file changed, 1 deletion(-) diff --git a/core/prelude-mode.el b/core/prelude-mode.el index 2e2b4d0..d2afe0b 100644 --- a/core/prelude-mode.el +++ b/core/prelude-mode.el @@ -62,7 +62,6 @@ (define-key map (kbd "C-c t") 'prelude-visit-term-buffer) (define-key map (kbd "C-c k") 'prelude-kill-other-buffers) (define-key map (kbd "C-c TAB") 'prelude-indent-rigidly-and-copy-to-clipboard) - (define-key map (kbd "C-c h") 'helm-prelude) (define-key map (kbd "C-c I") 'prelude-find-user-init-file) (define-key map (kbd "C-c S") 'prelude-find-shell-init-file) ;; make some use of the Super key From 461a560ddd3f25119211e33e50c5c403d6c2a390 Mon Sep 17 00:00:00 2001 From: toctan Date: Sun, 1 Jun 2014 13:28:54 +0800 Subject: [PATCH 2/2] Define prelude helm menu entry in its own module --- core/prelude-mode.el | 3 --- modules/prelude-helm.el | 6 +++++- 2 files changed, 5 insertions(+), 4 deletions(-) diff --git a/core/prelude-mode.el b/core/prelude-mode.el index d2afe0b..dadfc56 100644 --- a/core/prelude-mode.el +++ b/core/prelude-mode.el @@ -111,9 +111,6 @@ ["Eval and replace" prelude-eval-and-replace] ) - ("Navigation" - ["Helm" helm-prelude]) - ("Windows" ["Swap windows" prelude-swap-windows]) diff --git a/modules/prelude-helm.el b/modules/prelude-helm.el index 42a2459..2033def 100644 --- a/modules/prelude-helm.el +++ b/modules/prelude-helm.el @@ -49,7 +49,11 @@ (error (helm-mini)))) (eval-after-load 'prelude-mode - '(define-key prelude-mode-map (kbd "C-c h") 'helm-prelude)) + '(progn + (define-key prelude-mode-map (kbd "C-c h") 'helm-prelude) + (easy-menu-add-item nil '("Tools" "Prelude") + '("Navigation" + ["Helm" helm-prelude])))) (push "Press to navigate a project in Helm." prelude-tips)