diff options
| -rw-r--r-- | lisp/init-files.el | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/lisp/init-files.el b/lisp/init-files.el index de06fdd..4ed0d4d 100644 --- a/lisp/init-files.el +++ b/lisp/init-files.el @@ -111,6 +111,16 @@ entering `ch' is equivalent to `*.[ch]'.") (line-beginning-position 5)))) (narrow-to-region beg (point-max)))) +(defun km/grep-avy-goto-subword-1 () + "Like `avy-goto-subword-1', but call `compilation-display-error'." + (interactive) + (let (avy-all-windows) + (call-interactively #'avy-goto-subword-1)) + (compilation-display-error)) + +(after 'grep + (define-key grep-mode-map "j" 'km/grep-avy-goto-subword-1)) + (define-prefix-command 'km/file-search-map) (define-key km/file-map "s" 'km/file-search-map) |