summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--lisp/init-files.el10
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)