From 1e1e40160e501073c7cedc1346cf0a40f33fe705 Mon Sep 17 00:00:00 2001 From: Lucien Cartier-Tilet Date: Sun, 24 Jul 2022 11:41:50 +0200 Subject: [PATCH] [Emacs] More avy! --- org/config/emacs.org | 54 ++++++++++++++++++++++++++++++++++++-------- 1 file changed, 44 insertions(+), 10 deletions(-) diff --git a/org/config/emacs.org b/org/config/emacs.org index 3ea3111..e2587f2 100644 --- a/org/config/emacs.org +++ b/org/config/emacs.org @@ -7972,14 +7972,24 @@ either in Emacs or in an external web browser. I prefer the defaults. :PROPERTIES: :CUSTOM_ID: Packages-Configuration-Misc-avyral6fl6184j0 :END: -~avy~ is a really convenient way of jumping around, but I’ll need some -configuration to make it bépo-compatible. +~avy~ is a really convenient way of jumping around and performing +actions on these selections, but I’ll need some configuration to make +it bépo-compatible. #+begin_src emacs-lisp (use-package avy :defer t :straight t :config - (setq avy-keys '(?a ?u ?i ?e ?c ?t ?s ?r ?n)) + (csetq avy-keys '(?a ?u ?i ?e ?c ?t ?s ?r ?n) + avy-dispatch-alist '((?x . avy-action-kill-move) + (?X . avy-action-kill-stay) + (?T . avy-action-teleport) + (?m . avy-action-mark) + (?C . avy-action-copy) + (?y . avy-action-yank) + (?Y . avy-action-yank-line) + (?I . avy-action-ispell) + (?z . avy-action-zap-to-char))) (defun my/avy-goto-url () "Jump to url with avy." (interactive) @@ -7991,15 +8001,40 @@ configuration to make it bépo-compatible. (browse-url-at-point)) :general (phundrak/evil - :packages 'avy - "gl" #'avy-goto-line) + :pakages 'avy + "gc" #'evil-avy-goto-char-timer + "gl" #'evil-avy-goto-line) (phundrak/leader-key :packages 'avy :infix "j" - "j" #'evil-avy-goto-char-timer - "l" #'evil-avy-goto-line - "u" #'my/avy-goto-url - "U" #'my/avy-open-url)) + "b" #'avy-pop-mark + "c" #'evil-avy-goto-char-timer + "l" #'avy-goto-line) + (phundrak/leader-key + :packages 'avy + :infix "A" + "c" '(:ignore t :which-key "copy") + "cl" #'avy-copy-line + "cr" #'avy-copy-region + "k" '(:ignore t :which-key "kill") + "kl" #'avy-kill-whole-line + "kL" #'avy-kill-ring-save-whole-line + "kr" #'avy-kill-region + "kR" #'avy-kill-ring-save-region + "m" '(:ignore t :which-key "move") + "ml" #'avy-move-line + "mr" #'avy-move-region + "mt" #'avy-transpose-lines-in-region + "n" #'avy-next + "p" #'avy-prev + "u" #'my/avy-goto-url + "U" #'my/avy-open-url) + (phundrak/major-leader-key + :packages '(avy org) + :keymaps 'org-mode-map + "A" '(:ignore t :which-key "avy") + "Ar" #'avy-org-refile-as-child + "Ah" #'avy-org-goto-heading-timer)) #+end_src *** Calc @@ -8337,7 +8372,6 @@ My keybinds for jumping around are prefixed by ~j~. | Key | Function | Description | |-----+-------------------------+-------------| | | | jump | -| c | counsel-dired-jump | | | f | counsel-file-jump | | | d | dired-jump | | | D | dired-jump-other-window | |