[elpa] externals/kiwix b2d0c0dc9d 14/15: rename let-binding variable names.

[ELPA Syncer]

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

    rename let-binding variable names.
---
 kiwix.el | 22 +++++++++++-----------
 1 file changed, 11 insertions(+), 11 deletions(-)

diff --git a/kiwix.el b/kiwix.el
index ee6b5f0a92..732bac31de 100644
--- a/kiwix.el
+++ b/kiwix.el
@@ -173,19 +173,19 @@ Set it to ‘t’ will use Emacs built-in ‘completing-read’."
                                             (when (and (listp cons) (eq (car 
cons) 'entry))
                                               (let* ((entry-xml cons)
                                                      (title (caddr (assq 
'title entry-xml))) ; "title"
-                                                     (thumbnail_url (format 
"%s:%s/%s"
+                                                     (thumbnail-url (format 
"%s:%s/%s"
                                                                             
kiwix-server-url kiwix-server-port
                                                                             
(cdr (assq 'href (cadr (assq 'link entry-xml))))))
-                                                     (link_url_path (cdr
-                                                                     (assq 
'href
-                                                                           
(cadr
-                                                                            
(seq-find
-                                                                             
(lambda (element)
-                                                                               
(if (and (listp element) (eq (car element) 'link))
-                                                                               
    (if (string-equal (cdr (assq 'type (cadr element))) "text/html")
-                                                                               
        element)))
-                                                                             
entry-xml)))))
-                                                     (library-filename 
(string-trim-left link_url_path "/")))
+                                                     (library-link-path (cdr
+                                                                         (assq 
'href
+                                                                               
(cadr
+                                                                               
 (seq-find
+                                                                               
  (lambda (element)
+                                                                               
    (if (and (listp element) (eq (car element) 'link))
+                                                                               
        (if (string-equal (cdr (assq 'type (cadr element))) "text/html")
+                                                                               
            element)))
+                                                                               
  entry-xml)))))
+                                                     (library-filename 
(string-trim-left library-link-path "/")))
                                                 (propertize library-filename
                                                             'display (format 
"%s (%s)" title library-filename)))))
                                           xml-data))))))