fix(nativation): make consult-buffer (C-x b) work before projectile is loaded

This commit is contained in:
2021-06-19 19:45:55 +01:00
parent 689dc6a1e4
commit b647d6447b

View File

@@ -22,7 +22,13 @@
consult--source-project-buffer
consult--source-project-file))
(consult-preview-max-count 10)
(consult-project-root-function 'projectile-project-root))
(consult-project-root-function 'siren-consult-project-root)
:init
(defun siren-consult-project-root (&rest args)
"Call projectile-project-root if defined, otherwise return empty string."
(if (fboundp 'projectile-project-root)
(apply 'projectile-project-root args) "")))
(provide 'siren-consult)
;;; siren-consult.el ends here