diff options
author | Martin Polden <mpolden@mpolden.no> | 2022-01-25 23:07:10 +0100 |
---|---|---|
committer | Martin Polden <mpolden@mpolden.no> | 2022-01-25 23:08:50 +0100 |
commit | be7348eb00f9b8b80b55d19f2334cc0db5df471b (patch) | |
tree | 01ab0a887d0984e725e4fdbe5897259d9263fcd3 /lisp/init-grep.el | |
parent | ded137bfa83c9fd9d7f7e9895f3d8d1ad518a157 (diff) |
grep: Fix function for Emacs 28
Diffstat (limited to 'lisp/init-grep.el')
-rw-r--r-- | lisp/init-grep.el | 10 |
1 files changed, 6 insertions, 4 deletions
diff --git a/lisp/init-grep.el b/lisp/init-grep.el index 2c17ac4..344e90a 100644 --- a/lisp/init-grep.el +++ b/lisp/init-grep.el @@ -29,13 +29,15 @@ current project." default-directory)) (use-rg (executable-find "rg")) (use-git (and git-repository (executable-find "git"))) - (grep-template (cond (use-rg mpolden/rg-template) - (use-git mpolden/git-grep-template)))) - (grep-apply-setting 'grep-template grep-template) + (template (cond (use-rg mpolden/rg-template) + (use-git mpolden/git-grep-template)))) + (grep-apply-setting 'grep-template template) ;; never use null device as all programs support -H (grep-apply-setting 'grep-use-null-device nil) (if (or use-rg use-git) - (lgrep (grep-read-regexp) "" dir) + ;; never pass --directories + (let ((grep-use-directories-skip nil)) + (lgrep (grep-read-regexp) "" dir)) (rgrep (grep-read-regexp) "*" dir)))) (defun mpolden/grep-visit-buffer-other-window (&optional result noselect) |