[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/kiwix 423f607 05/18: Concentrate all kiwix library dir
From: |
Stefan Monnier |
Subject: |
[elpa] externals/kiwix 423f607 05/18: Concentrate all kiwix library dir variables into only one |
Date: |
Wed, 4 Aug 2021 18:28:09 -0400 (EDT) |
branch: externals/kiwix
commit 423f60705b0922437984387d89d8153c74bf204a
Author: stardiviner <numbchild@gmail.com>
Commit: stardiviner <numbchild@gmail.com>
Concentrate all kiwix library dir variables into only one
---
kiwix.el | 38 ++++++++------------------------------
1 file changed, 8 insertions(+), 30 deletions(-)
diff --git a/kiwix.el b/kiwix.el
index 2ab9843..dc111d4 100644
--- a/kiwix.el
+++ b/kiwix.el
@@ -67,7 +67,12 @@
"Kiwix customization options."
:group 'kiwix)
-(defcustom kiwix-zim-dir "~/.www.kiwix.org/kiwix"
+(defcustom kiwix-zim-dir
+ (file-name-directory
+ (concat
+ "~/.www.kiwix.org/kiwix"
+ (car (directory-files kiwix-zim-dir nil ".*\\.default\\'")) ; profile
folder name
+ "/data/library/*.zim"))
"The kiwix ZIM files directory."
:type 'string
:safe #'stringp)
@@ -104,33 +109,6 @@
"Specify kiwix server command."
:type 'string)
-(defun kiwix-dir-detect ()
- "Detect Kiwix profile directory exist."
- (let ((kiwix-dir kiwix-zim-dir))
- (if (and (file-directory-p kiwix-dir) (file-readable-p kiwix-dir))
- kiwix-dir
- (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 kiwix-zim-dir nil ".*\\.default\\'")))
- "Specify the default Kiwix data profile path."
- :type 'string)
-
-(defcustom kiwix-default-data-dir
- (when (kiwix-dir-detect)
- (concat kiwix-zim-dir kiwix-default-data-profile-name))
- "Specify the default Kiwix data directory."
- :type 'string
- :safe #'stringp)
-
-(defcustom kiwix-default-library-dir
- (file-name-directory (concat kiwix-default-data-dir
"/data/library/library.xml"))
- "Kiwix libraries path."
- :type 'string
- :safe #'stringp)
-
(defcustom kiwix-default-completing-read (cond
((fboundp 'consult--read) 'selectrum)
((fboundp 'ivy-read) 'ivy)
@@ -160,9 +138,9 @@ Set it to ‘t’ will use Emacs built-in ‘completing-read’."
(defun kiwix-get-libraries ()
"Check out all available Kiwix libraries."
- (when (kiwix-dir-detect)
+ (when kiwix-zim-dir
(mapcar #'kiwix--get-library-name
- (directory-files kiwix-default-library-dir nil ".*\\.zim\\'"))))
+ (directory-files kiwix-zim-dir nil ".*\\.zim\\'"))))
(defvar kiwix-libraries (kiwix-get-libraries)
"A list of Kiwix libraries.")
- [elpa] externals/kiwix updated (0c5e161 -> 71e770c), Stefan Monnier, 2021/08/04
- [elpa] externals/kiwix c273429 06/18: refactor and remove the variable `kiwix--selected-library', Stefan Monnier, 2021/08/04
- [elpa] externals/kiwix ca03a65 01/18: use Docker server by default, Stefan Monnier, 2021/08/04
- [elpa] externals/kiwix c871bef 07/18: refactor function kiwix-at-point to separate into smaller functional functions, Stefan Monnier, 2021/08/04
- [elpa] externals/kiwix 7e0b82c 04/18: refresh ZIM libraries list once-time per package loading, Stefan Monnier, 2021/08/04
- [elpa] externals/kiwix 12e13c8 02/18: support remote Docker service, Stefan Monnier, 2021/08/04
- [elpa] externals/kiwix 423f607 05/18: Concentrate all kiwix library dir variables into only one,
Stefan Monnier <=
- [elpa] externals/kiwix 716f3c4 12/18: Add condition to detect kiwix library path exist to fix GitHub Actions, Stefan Monnier, 2021/08/04
- [elpa] externals/kiwix e191c31 09/18: improve function kiwix-get-libraries to support remote Docker server, Stefan Monnier, 2021/08/04
- [elpa] externals/kiwix 0ec84f3 03/18: use dynamic ZIM library path, Stefan Monnier, 2021/08/04
- [elpa] externals/kiwix 3330d7e 08/18: Add extra library "elquery" for parsing HTTP query HTML result, Stefan Monnier, 2021/08/04
- [elpa] externals/kiwix a33c4a2 16/18: Fix kiwix-libraries variable not initialized by function kiwix-get-libraries, Stefan Monnier, 2021/08/04
- [elpa] externals/kiwix 0f85022 17/18: Add autoload cookies and improve docstring, Stefan Monnier, 2021/08/04
- [elpa] externals/kiwix f49557d 11/18: Fix format three fields, Stefan Monnier, 2021/08/04
- [elpa] externals/kiwix f9cae99 13/18: Improve kiwix-server-type docstring, Stefan Monnier, 2021/08/04
- [elpa] externals/kiwix c0c597d 14/18: Improve package config examples on README, Stefan Monnier, 2021/08/04
- [elpa] externals/kiwix 9521d3b 15/18: Change default kiwix-server-type to docker-local, Stefan Monnier, 2021/08/04