[elpa] externals/kiwix ca03a65 01/18: use Docker server by default

[Stefan Monnier]

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

    use Docker server by default
---
 kiwix.el | 17 +++++++++--------
 1 file changed, 9 insertions(+), 8 deletions(-)

diff --git a/kiwix.el b/kiwix.el
index c290cae..6b07ad6 100644
--- a/kiwix.el
+++ b/kiwix.el
@@ -67,7 +67,7 @@
   "Kiwix customization options."
   :group 'kiwix)
 
-(defcustom kiwix-server-use-docker nil
+(defcustom kiwix-server-use-docker t
   "Using Docker container for kiwix-serve or not?"
   :type 'boolean
   :safe #'booleanp)
@@ -82,13 +82,14 @@
   :type 'string)
 
 (defcustom kiwix-server-command
-  (cond
-   ((file-executable-p "/usr/bin/kiwix-serve") "/usr/bin/kiwix-serve")
-   ((eq system-type 'gnu/linux) "/usr/lib/kiwix/bin/kiwix-serve")
-   ((eq system-type 'darwin)
-    (warn "You need to specify Mac OS X Kiwix path. And send a PR to my 
repo."))
-   ((eq system-type 'windows-nt)
-    (warn "You need to specify Windows Kiwix path. And send a PR to my 
repo.")))
+  (when (null kiwix-server-use-docker)
+    (cond
+     ((file-executable-p "/usr/bin/kiwix-serve") "/usr/bin/kiwix-serve")
+     ((eq system-type 'gnu/linux) "/usr/lib/kiwix/bin/kiwix-serve")
+     ((eq system-type 'darwin)
+      (warn "You need to specify Mac OS X Kiwix path. And send a PR to my 
repo."))
+     ((eq system-type 'windows-nt)
+      (warn "You need to specify Windows Kiwix path. And send a PR to my 
repo."))))
   "Specify kiwix server command."
   :type 'string)