Clean up keybindings
This commit is contained in:
parent
9dbbf28346
commit
ed566a76ae
64
init.el
64
init.el
@ -195,44 +195,24 @@
|
|||||||
;; [ F6 ] -> Toggle line-wrapping
|
;; [ F6 ] -> Toggle line-wrapping
|
||||||
;; [ F7 ] -> Toggle linum-mode/display-line-numbers-mode
|
;; [ F7 ] -> Toggle linum-mode/display-line-numbers-mode
|
||||||
;; [ F10 ] -> (Overwritten) Open the menubar in a minibuffer
|
;; [ F10 ] -> (Overwritten) Open the menubar in a minibuffer
|
||||||
;; [ C-z ] -> (Overwritten) Undo
|
;; [ C-z ] -> (Overwritten) Undo (and don't suspend, thanks)
|
||||||
;; [ C-x C-b ] -> (Overwritten) Invoke ibuffer
|
;; [ C-c o ] -> Focus on minibuffer window
|
||||||
;; [ C-c C-o ] -> Focus on minibuffer window
|
;; [ C-c r ] -> Revert buffer without confirmation
|
||||||
;; [ C-c C-r ] -> Revert buffer without confirmation
|
|
||||||
;; [ C-x RET ] -> Open eshell in the current buffer
|
;; [ C-x RET ] -> Open eshell in the current buffer
|
||||||
;; [ C-c C-<i,j,k,l> ] -> Focus on the window in <direction>
|
;; [ C-x C-b ] -> (Overwritten) Invoke ibuffer
|
||||||
;; [ M-n / M-p ] -> Scroll up/down by one line
|
;; [ M-n / M-p ] -> Scroll up/down by one line
|
||||||
;; [ C-M-n / C-M-p ] -> Move forward/back by one paragraph
|
;; [ C-M-n / C-M-p ] -> Move forward/back by one paragraph
|
||||||
|
;; [ C-c C-<i,j,k,l> ] -> Focus on the window in <direction>
|
||||||
|
|
||||||
;; Require bind-key. (Bundled with use-package)
|
;; Require bind-key. (Bundled with use-package)
|
||||||
(require 'bind-key)
|
(require 'bind-key)
|
||||||
|
|
||||||
;; Bind a key to toggle line wrapping behavior.
|
|
||||||
(bind-key [f6] 'visual-line-mode)
|
|
||||||
|
|
||||||
;; Bind a key to show line numbers.
|
|
||||||
(bind-key [f7] 'linum-mode)
|
|
||||||
(when (>= emacs-major-version 26)
|
|
||||||
(bind-key [f7] 'display-line-numbers-mode))
|
|
||||||
|
|
||||||
;; Replace the menu-bar-open keybind with a tmm-menubar keybind.
|
|
||||||
(bind-key [f10] 'tmm-menubar)
|
|
||||||
|
|
||||||
;; Replace the suspend-emacs keybind with a (much less annoying) undo keybind.
|
|
||||||
(bind-key "C-z" 'undo)
|
|
||||||
|
|
||||||
;; Replace the list-buffers keybind with an ibuffer keybind.
|
|
||||||
(bind-key "C-x C-b" 'ibuffer)
|
|
||||||
|
|
||||||
;; Bind a key to switch to the minibuffer.
|
|
||||||
(defun switch-to-minibuffer-window ()
|
(defun switch-to-minibuffer-window ()
|
||||||
"Switch to the minibuffer window (if active)."
|
"Switch to the minibuffer window (if active)."
|
||||||
(interactive)
|
(interactive)
|
||||||
(when (active-minibuffer-window)
|
(when (active-minibuffer-window)
|
||||||
(select-window (active-minibuffer-window))))
|
(select-window (active-minibuffer-window))))
|
||||||
(bind-key "C-c C-o" 'switch-to-minibuffer-window)
|
|
||||||
|
|
||||||
;; Bind a key to revert the buffer without confirmation.
|
|
||||||
(defun revert-buffer-no-confirm ()
|
(defun revert-buffer-no-confirm ()
|
||||||
"Revert the current buffer without confirmation."
|
"Revert the current buffer without confirmation."
|
||||||
(interactive)
|
(interactive)
|
||||||
@ -240,24 +220,24 @@
|
|||||||
(revert-buffer :ignore-auto :noconfirm)
|
(revert-buffer :ignore-auto :noconfirm)
|
||||||
(when (yes-or-no-p "The contents of this buffer have been modified. Really revert? ")
|
(when (yes-or-no-p "The contents of this buffer have been modified. Really revert? ")
|
||||||
(revert-buffer :ignore-auto :noconfirm))))
|
(revert-buffer :ignore-auto :noconfirm))))
|
||||||
(bind-key "C-c C-r" 'revert-buffer-no-confirm)
|
|
||||||
|
|
||||||
;; Bind a key to open up eshell.
|
;; Set up all custom bindings (non-package-specific)
|
||||||
(bind-key "C-x RET" 'eshell)
|
(bind-keys ([f6] 'visual-line-mode)
|
||||||
|
([f7] (if (>= emacs-major-version 26) 'display-line-numbers-mode 'linum-mode))
|
||||||
;; Bind keys to switch windows easier.
|
([f10] 'tmm-menubar)
|
||||||
(bind-key* "C-c C-i" 'windmove-up)
|
("C-z" 'undo)
|
||||||
(bind-key* "C-c C-k" 'windmove-down)
|
("C-c o" 'switch-to-minibuffer-window)
|
||||||
(bind-key* "C-c C-j" 'windmove-left)
|
("C-c r" 'revert-buffer-no-confirm)
|
||||||
(bind-key* "C-c C-l" 'windmove-right)
|
("C-x RET" 'eshell)
|
||||||
|
("C-x C-b" 'ibuffer)
|
||||||
;; Bind keys to scroll up/down by one line
|
("M-n" 'scroll-up-line)
|
||||||
(bind-key "M-n" 'scroll-up-line)
|
("M-p" 'scroll-down-line)
|
||||||
(bind-key "M-p" 'scroll-down-line)
|
("C-M-n" 'forward-paragraph)
|
||||||
|
("C-M-p" 'backward-paragraph))
|
||||||
;; Bind keys to move forward/back by one paragraph
|
(bind-keys* ("C-c C-i" 'windmove-up)
|
||||||
(bind-key "C-M-n" 'forward-paragraph)
|
("C-c C-k" 'windmove-down)
|
||||||
(bind-key "C-M-p" 'backward-paragraph)
|
("C-c C-j" 'windmove-left)
|
||||||
|
("C-c C-l" 'windmove-right))
|
||||||
|
|
||||||
;;====================
|
;;====================
|
||||||
;; Init File
|
;; Init File
|
||||||
|
Loading…
Reference in New Issue
Block a user