branch: externals/kiwix commit 4b093e074a6cd387bc6c84e999f3bbaca96ae09b Author: stardiviner <numbch...@gmail.com> Commit: stardiviner <numbch...@gmail.com>
add autoload cookies for some necessary functions --- kiwix.el | 13 +++++-------- 1 file changed, 5 insertions(+), 8 deletions(-) diff --git a/kiwix.el b/kiwix.el index b44bb67..67d7efa 100644 --- a/kiwix.el +++ b/kiwix.el @@ -38,10 +38,7 @@ (require 'cl-lib) -;;;###autoload -(declare-function 'org-link-set-parameters "org") (autoload 'org-link-set-parameters "org") -(declare-function 'org-store-link-props "org") (autoload 'org-store-link-props "org") (defgroup kiwix-mode nil @@ -77,7 +74,6 @@ :type 'string :group 'kiwix-mode) -;;;###autoload (defun kiwix-dir-detect () "Detect Kiwix profile directory exist." (let ((kiwix-dir (concat (getenv "HOME") "/.www.kiwix.org/kiwix"))) @@ -100,6 +96,11 @@ :type 'string :group 'kiwix-mode) +;;;###autoload +(defun kiwix--get-library-name (file) + "Extract library name from library file." + (replace-regexp-in-string "\.zim" "" file)) + (defvar kiwix-libraries (when (kiwix-dir-detect) (mapcar #'kiwix--get-library-name @@ -107,10 +108,6 @@ (concat kiwix-default-data-path "/data/library/") nil ".*\.zim"))) "A list of Kiwix libraries.") -(defun kiwix--get-library-name (file) - "Extract library name from library file." - (replace-regexp-in-string "\.zim" "" file)) - ;; - examples: ;; - "wikipedia_en_all" - "wikipedia_en_all_2016-02" ;; - "wikipedia_zh_all" - "wikipedia_zh_all_2015-17"