This commit is contained in:
Case Duckworth 2021-04-05 16:59:35 -05:00
parent 878334c9a8
commit d5b80fa068
1 changed files with 5 additions and 4 deletions

View File

@ -626,7 +626,7 @@ if ripgrep is installed, otherwise `consult-grep'."
(interactive "P")
(cond ((= (vc-backend buffer-file-name) "Git")
(call-interactively #'consult-git-grep))
((exectuable-find "rg")
((executable-find "rg")
(call-interactively #'consult-ripgrep))
(t (call-interactively #'consult-grep))))
(defun consult-sensible-find ()
@ -775,7 +775,7 @@ if ripgrep is installed, otherwise `consult-grep'."
;;;; System tie-ins
;; Insctead of using `setup''s `:needs', I'm going to wrap these in
;; `exectuable-find' forms. I don't want to waste time with pulling packages
;; `executable-find' forms. I don't want to waste time with pulling packages
;; that won't work on a machine.
;;;;; PKGBUILDs
@ -797,7 +797,8 @@ if ripgrep is installed, otherwise `consult-grep'."
(defun dumb-auto-format ()
"Run `indent-region' in buffers that don't have an `apheleia'
formatter set."
(unless (apheleia--get-formatter-command)
(unless (and (fboundp 'apheleia--get-formatter-command)
(apheleia--get-formatter-command))
(indent-region (point-min) (point-max))))))
;;;; Eldoc
@ -860,7 +861,7 @@ if ripgrep is installed, otherwise `consult-grep'."
;;;;; Scheme
(when (or (executable-find "guile")
(exectuable-find "csi")
(executable-find "csi")
(executable-find "racket"))
(setup (:straight geiser)
(:with-mode geiser-repl-mode