[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/embark 592287b7d7: consult-locate also should override
From: |
ELPA Syncer |
Subject: |
[elpa] externals/embark 592287b7d7: consult-locate also should override the default action |
Date: |
Wed, 6 Apr 2022 08:57:30 -0400 (EDT) |
branch: externals/embark
commit 592287b7d7393f6f13225b722f550d59cf2eb665
Author: Omar Antolín <omar.antolin@gmail.com>
Commit: Omar Antolín <omar.antolin@gmail.com>
consult-locate also should override the default action
---
embark-consult.el | 5 ++++-
1 file changed, 4 insertions(+), 1 deletion(-)
diff --git a/embark-consult.el b/embark-consult.el
index 9b49bbe90c..a3b405f504 100644
--- a/embark-consult.el
+++ b/embark-consult.el
@@ -220,11 +220,14 @@ This function is meant to be added to
`embark-collect-mode-hook'."
(setf (alist-get 'consult-grep embark-exporters-alist)
#'embark-consult-export-grep)
-;;; Support for consult-find
+;;; Support for consult-find and consult-locate
(setf (alist-get '(file . consult-find) embark-default-action-overrides)
#'find-file)
+(setf (alist-get '(file . consult-locate) embark-default-action-overrides)
+ #'find-file)
+
(defun embark-consult--wait-for-find ()
(when (eq embark--command 'consult-find)
(add-hook 'embark--export-pre-revert-hook #'embark-consult--await nil t)))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] externals/embark 592287b7d7: consult-locate also should override the default action,
ELPA Syncer <=