From ce582310379d7dff44211e40040728c1ed957aad Mon Sep 17 00:00:00 2001
From: Thanos Apollo <public@thanosapollo.org>
Date: Fri, 6 Dec 2024 09:57:31 +0200
Subject: 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(+)

(limited to 'org-gnosis.el')

diff --git a/org-gnosis.el b/org-gnosis.el
index f2e8899..97bca05 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'."
-- 
cgit v1.2.3