emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/kiwix 0ec84f3 03/18: use dynamic ZIM library path


From: Stefan Monnier
Subject: [elpa] externals/kiwix 0ec84f3 03/18: use dynamic ZIM library path
Date: Wed, 4 Aug 2021 18:28:09 -0400 (EDT)

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

    use dynamic ZIM library path
---
 kiwix.el | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/kiwix.el b/kiwix.el
index 2e1bcae..18c610e 100644
--- a/kiwix.el
+++ b/kiwix.el
@@ -106,21 +106,21 @@
 
 (defun kiwix-dir-detect ()
   "Detect Kiwix profile directory exist."
-  (let ((kiwix-dir "~/.www.kiwix.org/kiwix"))
+  (let ((kiwix-dir kiwix-zim-dir))
     (if (and (file-directory-p kiwix-dir) (file-readable-p kiwix-dir))
         kiwix-dir
-      (warn "ERROR: Kiwix profile directory \"~/.www.kiwix.org/kiwix\" is not 
accessible.")
+      (warn (format "ERROR: Kiwix profile directory %s is not accessible." 
kiwix-zim-dir))
       nil)))
 
 (defcustom kiwix-default-data-profile-name
   (when (kiwix-dir-detect)
-    (car (directory-files "~/.www.kiwix.org/kiwix" nil ".*\\.default\\'")))
+    (car (directory-files kiwix-zim-dir nil ".*\\.default\\'")))
   "Specify the default Kiwix data profile path."
   :type 'string)
 
 (defcustom kiwix-default-data-dir
   (when (kiwix-dir-detect)
-    (concat "~/.www.kiwix.org/kiwix/" kiwix-default-data-profile-name))
+    (concat kiwix-zim-dir kiwix-default-data-profile-name))
   "Specify the default Kiwix data directory."
   :type 'string
   :safe #'stringp)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]