[Fix #399] Extract key-chord into a separate module
This commit is contained in:
parent
523a4851a6
commit
3239f5c724
5 changed files with 53 additions and 12 deletions
|
@ -357,6 +357,8 @@ If you ever forget any of Projectile's keybindings just do a:
|
||||||
|
|
||||||
#### Key-chords
|
#### Key-chords
|
||||||
|
|
||||||
|
**Key-chords are available only when the `prelude-key-chord` module has been enabled.**
|
||||||
|
|
||||||
Keybinding | Description
|
Keybinding | Description
|
||||||
-------------------|----------------------------------------------
|
-------------------|----------------------------------------------
|
||||||
<kbd>jj</kbd> | Jump to the beginning of a word(`ace-jump-word-mode`)
|
<kbd>jj</kbd> | Jump to the beginning of a word(`ace-jump-word-mode`)
|
||||||
|
|
|
@ -114,17 +114,6 @@
|
||||||
(global-set-key (kbd "C-c SPC") 'ace-jump-mode)
|
(global-set-key (kbd "C-c SPC") 'ace-jump-mode)
|
||||||
(global-set-key (kbd "C-x SPC") 'ace-jump-mode-pop-mark)
|
(global-set-key (kbd "C-x SPC") 'ace-jump-mode-pop-mark)
|
||||||
|
|
||||||
;; key chords
|
|
||||||
(require 'key-chord)
|
|
||||||
|
|
||||||
(key-chord-define-global "jj" 'ace-jump-word-mode)
|
|
||||||
(key-chord-define-global "jl" 'ace-jump-line-mode)
|
|
||||||
(key-chord-define-global "jk" 'ace-jump-char-mode)
|
|
||||||
(key-chord-define-global "JJ" 'prelude-switch-to-previous-buffer)
|
|
||||||
(key-chord-define-global "uu" 'undo-tree-visualize)
|
|
||||||
|
|
||||||
(key-chord-mode +1)
|
|
||||||
|
|
||||||
(provide 'prelude-global-keybindings)
|
(provide 'prelude-global-keybindings)
|
||||||
|
|
||||||
;;; prelude-global-keybindings.el ends here
|
;;; prelude-global-keybindings.el ends here
|
||||||
|
|
|
@ -46,7 +46,7 @@
|
||||||
epl expand-region flx-ido flycheck gist
|
epl expand-region flx-ido flycheck gist
|
||||||
gitconfig-mode gitignore-mode grizzl
|
gitconfig-mode gitignore-mode grizzl
|
||||||
guru-mode projectile ido-ubiquitous
|
guru-mode projectile ido-ubiquitous
|
||||||
key-chord magit move-text rainbow-mode
|
magit move-text rainbow-mode
|
||||||
smartparens smex undo-tree
|
smartparens smex undo-tree
|
||||||
volatile-highlights zenburn-theme)
|
volatile-highlights zenburn-theme)
|
||||||
"A list of packages to ensure are installed at launch.")
|
"A list of packages to ensure are installed at launch.")
|
||||||
|
|
49
modules/prelude-key-chord.el
Normal file
49
modules/prelude-key-chord.el
Normal file
|
@ -0,0 +1,49 @@
|
||||||
|
;;; prelude-key-chord.el --- Helm setup
|
||||||
|
;;
|
||||||
|
;; Copyright © 2011-2013 Bozhidar Batsov
|
||||||
|
;;
|
||||||
|
;; Author: Bozhidar Batsov <bozhidar@batsov.com>
|
||||||
|
;; URL: https://github.com/bbatsov/prelude
|
||||||
|
;; Version: 1.0.0
|
||||||
|
;; Keywords: convenience
|
||||||
|
|
||||||
|
;; This file is not part of GNU Emacs.
|
||||||
|
|
||||||
|
;;; Commentary:
|
||||||
|
|
||||||
|
;; Some config for Helm.
|
||||||
|
|
||||||
|
;;; License:
|
||||||
|
|
||||||
|
;; This program is free software; you can redistribute it and/or
|
||||||
|
;; modify it under the terms of the GNU General Public License
|
||||||
|
;; as published by the Free Software Foundation; either version 3
|
||||||
|
;; of the License, or (at your option) any later version.
|
||||||
|
;;
|
||||||
|
;; This program is distributed in the hope that it will be useful,
|
||||||
|
;; but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||||
|
;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||||
|
;; GNU General Public License for more details.
|
||||||
|
;;
|
||||||
|
;; You should have received a copy of the GNU General Public License
|
||||||
|
;; along with GNU Emacs; see the file COPYING. If not, write to the
|
||||||
|
;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
|
||||||
|
;; Boston, MA 02110-1301, USA.
|
||||||
|
|
||||||
|
;;; Code:
|
||||||
|
|
||||||
|
;; key chords
|
||||||
|
(prelude-require-package 'key-chord)
|
||||||
|
(require 'key-chord)
|
||||||
|
|
||||||
|
(key-chord-define-global "jj" 'ace-jump-word-mode)
|
||||||
|
(key-chord-define-global "jl" 'ace-jump-line-mode)
|
||||||
|
(key-chord-define-global "jk" 'ace-jump-char-mode)
|
||||||
|
(key-chord-define-global "JJ" 'prelude-switch-to-previous-buffer)
|
||||||
|
(key-chord-define-global "uu" 'undo-tree-visualize)
|
||||||
|
|
||||||
|
(key-chord-mode +1)
|
||||||
|
|
||||||
|
(provide 'prelude-key-chord)
|
||||||
|
|
||||||
|
;;; prelude-key-chord.el ends here
|
|
@ -11,6 +11,7 @@
|
||||||
;; (require 'prelude-haskell)
|
;; (require 'prelude-haskell)
|
||||||
;; (require 'prelude-helm)
|
;; (require 'prelude-helm)
|
||||||
(require 'prelude-js)
|
(require 'prelude-js)
|
||||||
|
;; (require 'prelude-key-chord)
|
||||||
;; (require 'prelude-latex)
|
;; (require 'prelude-latex)
|
||||||
(require 'prelude-lisp)
|
(require 'prelude-lisp)
|
||||||
;; (require 'prelude-mediawiki)
|
;; (require 'prelude-mediawiki)
|
||||||
|
|
Loading…
Reference in a new issue