[elpa] externals/hyperbole 3bb91af97b: Remove some warnings (#306)

[ELPA Syncer]

branch: externals/hyperbole
commit 3bb91af97bde4636fdaf2b3b805ac10ac3feb6e3
Author: Mats Lidell <mats.lid...@lidells.se>
Commit: GitHub <nore...@github.com>

    Remove some warnings (#306)
---
 ChangeLog       | 8 ++++++++
 hversion.el     | 4 ++--
 hyrolo.el       | 4 ++--
 kotl/kexport.el | 4 ++--
 4 files changed, 14 insertions(+), 6 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index e89651468c..de96e001f4 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,11 @@
+2023-02-13  Mats Lidell  <ma...@gnu.org>
+
+* hversion.el (id-info-item): Use two args with looking-back.
+
+* hyrolo.el (hyrolo-kill): Set unused lexical var to _level-len
+
+* kotl/kexport.el (kexport:html): Remove unused lexical var is-collapsible.
+
 2023-02-12  Bob Weiner  <r...@gnu.org>
 
 * hibtypes.el (grep-msg): Fix problem where filename match includes trailing 
line
diff --git a/hversion.el b/hversion.el
index e526d3c338..a052bc3645 100644
--- a/hversion.el
+++ b/hversion.el
@@ -4,7 +4,7 @@
 ;; Maintainer:   Bob Weiner, Mats Lidell
 ;;
 ;; Orig-Date:     1-Jan-94
-;; Last-Mod:      4-Dec-22 at 03:57:42 by Bob Weiner
+;; Last-Mod:     12-Feb-23 at 22:40:12 by Mats Lidell
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
@@ -202,7 +202,7 @@ support is available."
                   ;; after the non-indented item definition line. If
                   ;; so, move back a line.
                   (when (and (looking-at "^[ \t]")
-                             (looking-back "^[^ \t].*[\n\r]+"))
+                             (looking-back "^[^ \t].*[\n\r]+" nil))
                     (forward-line -1))
                   (recenter 0))
               (error "(id-info-item): Invalid Info index item: `%s'" 
index-item)))
diff --git a/hyrolo.el b/hyrolo.el
index a95ca85707..3fa329c202 100644
--- a/hyrolo.el
+++ b/hyrolo.el
@@ -3,7 +3,7 @@
 ;; Author:       Bob Weiner
 ;;
 ;; Orig-Date:     7-Jun-89 at 22:08:29
-;; Last-Mod:     12-Feb-23 at 23:13:31 by Bob Weiner
+;; Last-Mod:     14-Feb-23 at 00:01:58 by Mats Lidell
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
@@ -675,7 +675,7 @@ Return t if entry is killed, nil otherwise."
          (setq file buffer-file-name)
          (if (file-writable-p file)
              (let ((kill-op
-                    (lambda (start level-len)
+                    (lambda (start _level-len)
                       (kill-region
                        start (hyrolo-to-entry-end t))
                       (setq killed t)
diff --git a/kotl/kexport.el b/kotl/kexport.el
index b06aa94159..c32a06cf4f 100644
--- a/kotl/kexport.el
+++ b/kotl/kexport.el
@@ -3,7 +3,7 @@
 ;; Author:       Bob Weiner
 ;;
 ;; Orig-Date:    26-Feb-98
-;; Last-Mod:      5-Feb-23 at 22:45:12 by Mats Lidell
+;; Last-Mod:     12-Feb-23 at 22:15:49 by Mats Lidell
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
@@ -462,7 +462,7 @@ used.  Also converts Urls and Klinks into Html hyperlinks.
                 ">" "&gt;"
                 (replace-regexp-in-string
                      "<" "&lt;" (kview:label-separator kview))))
-              i is-parent is-collapsible is-last-sibling no-sibling-stack 
level label contents)
+              i is-parent is-last-sibling no-sibling-stack level label 
contents)
          (kview:map-tree
           (lambda (_kview)
             (setq level (kcell-view:level)