branch: externals/kiwix commit ca03a65f3c107ea6010aec1cd08efba3c26af069 Author: stardiviner <numbch...@gmail.com> Commit: stardiviner <numbch...@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)