branch: externals/org-gnosis
commit ce582310379d7dff44211e40040728c1ed957aad
Author: Thanos Apollo <[email protected]>
Commit: Thanos Apollo <[email protected]>
Add org-gnosis-completing-read-func
* Function to use for completing-read. Adjusts for user that do not
have a completion system enabled.
---
org-gnosis.el | 11 +++++++++++
1 file changed, 11 insertions(+)
diff --git a/org-gnosis.el b/org-gnosis.el
index f2e8899c51..97bca05431 100644
--- a/org-gnosis.el
+++ b/org-gnosis.el
@@ -57,6 +57,17 @@
:type 'boolean
:group 'org-gnosis)
+(defcustom org-gnosis-completing-read-func
+ (cond ((or (bound-and-true-p ivy-mode)
+ (bound-and-true-p helm-mode)
+ (bound-and-true-p vertico-mode)
+ (bound-and-true-p fido-mode))
+ #'completing-read)
+ (t #'ido-completing-read))
+ "Function to use for `completing-read'."
+ :type 'function
+ :group 'gnosis)
+
(defface org-gnosis-face-tags
'((t :inherit font-lock-type-face))
"Face for displaying gnosis with `org-gnosis-find'."
