[elpa] externals/kiwix 7413397 019/192: add options to whether add org-mode link support

[Stefan Monnier]

branch: externals/kiwix
commit 74133973ef8867566b9fb8fec9e0e060ff04a8e7
Author: stardiviner <numbchild@gmail.com>
Commit: stardiviner <numbchild@gmail.com>

    add options to whether add org-mode link support
---
 kiwix.el | 14 +++++++++++++-
 1 file changed, 13 insertions(+), 1 deletion(-)

diff --git a/kiwix.el b/kiwix.el
index 9b79da4..1e892f4 100644
--- a/kiwix.el
+++ b/kiwix.el
@@ -44,6 +44,16 @@
   :type 'string
   :group 'kiwix)
 
+(defcustom kiwix-support-org-mode-link-type t
+  "Add support for Org-mode Kiwix link type."
+  :type 'boolean
+  :group 'kiwix)
+
+(defcustom kiwix-support-org-mode-link-abbrev t
+  "Add support for Org-mode Kiwix link abbrev."
+  :type 'boolean
+  :group 'kiwix)
+
 ;; launch Kiwix server
 ;;;###autoload
 (defun kiwix-launch-server ()
@@ -82,10 +92,12 @@
 ;; for open wiki search query with local application database.
 (defalias 'org-wiki-link-open 'kiwix-search)
 
-(org-add-link-type "wiki" 'org-wiki-link-open)
+(if kiwix-support-org-mode-link-type
+    (org-add-link-type "wiki" 'org-wiki-link-open))
 
 ;; [[Wikipedia_Local:]]
 (if (and
+     kiwix-support-org-mode-link-abbrev
      (member '("Wikipedia_Local" . 
"http://127.0.0.1:8000/wikipedia_zh_all_2015-11/A/%s.html";) 
org-link-abbrev-alist)
      (assoc "Wikipedia_Local" org-link-abbrev-alist))