|
|
|
|
@ -457,8 +457,8 @@ |
|
|
|
|
(global-visible-mark-mode t) |
|
|
|
|
#+end_src |
|
|
|
|
|
|
|
|
|
The following are some convenient bindings; notice that on my layout F13 and |
|
|
|
|
F14 are obtained by tapping the left and right shift respectively |
|
|
|
|
The following are some convenient bindings; notice that on my layout F17 and |
|
|
|
|
F18 are obtained by tapping the left and right shift respectively |
|
|
|
|
#+begin_src emacs-lisp |
|
|
|
|
(defun jump-to-mark () |
|
|
|
|
"Jumps to the local mark, respecting the `mark-ring' order. |
|
|
|
|
@ -471,12 +471,12 @@ |
|
|
|
|
(activate-mark)) |
|
|
|
|
|
|
|
|
|
(global-set-key-alist |
|
|
|
|
'(("<f13>" . set-mark-command) |
|
|
|
|
("<f14>" . set-mark-command) |
|
|
|
|
("<M-f13>" . jump-to-mark) |
|
|
|
|
("<M-f14>" . jump-to-mark) |
|
|
|
|
("<S-f13>" . just-activate-mark) |
|
|
|
|
("<S-f14>" . just-activate-mark))) |
|
|
|
|
'(("<f17>" . set-mark-command) |
|
|
|
|
("<f18>" . set-mark-command) |
|
|
|
|
("<M-f17>" . jump-to-mark) |
|
|
|
|
("<M-f18>" . jump-to-mark) |
|
|
|
|
("<S-f17>" . just-activate-mark) |
|
|
|
|
("<S-f18>" . just-activate-mark))) |
|
|
|
|
#+end_src |
|
|
|
|
** Global bindings |
|
|
|
|
Remove some bindings that I find supremely annoying. |
|
|
|
|
@ -2844,7 +2844,7 @@ |
|
|
|
|
This is throwing an error (static-if) |
|
|
|
|
#+begin_src emacs-lisp |
|
|
|
|
(require 'powerthesaurus) |
|
|
|
|
(global-set-key (kbd "C-<f14>") #'powerthesaurus-hydra/body) |
|
|
|
|
(global-set-key (kbd "C-<f18>") #'powerthesaurus-hydra/body) |
|
|
|
|
#+end_src |
|
|
|
|
|
|
|
|
|
** beacon |
|
|
|
|
@ -3141,8 +3141,8 @@ |
|
|
|
|
("C-c C-<" . mc/mark-all-like-this) |
|
|
|
|
("C-c C-#" . mc/insert-numbers) |
|
|
|
|
("C-c C-\\" . mc/mark-all-dwim) |
|
|
|
|
("C-c <f13>" . mc/mark-pop) |
|
|
|
|
("C-c <f14>" . mc/mark-pop))) |
|
|
|
|
("C-c <f17>" . mc/mark-pop) |
|
|
|
|
("C-c <f18>" . mc/mark-pop))) |
|
|
|
|
#+end_src |
|
|
|
|
** =avy= |
|
|
|
|
This packages allows fast navigation and action-ing |
|
|
|
|
|