master 15d628f196: Fix more lexical-binding fallout in vhdl-speedbar-insert-hierarchy

[Lars Ingebrigtsen]

branch: master
commit 15d628f1960ba71912cc9c3e8deaded77b953ccb
Author: Gonzalo Larumbe <gonzalomlarumbe@gmail.com>
Commit: Lars Ingebrigtsen <larsi@gnus.org>

    Fix more lexical-binding fallout in vhdl-speedbar-insert-hierarchy
    
    * lisp/progmodes/vhdl-mode.el (vhdl-speedbar-insert-hierarchy):
    Check the input arguments, not the dynamically bound `end-arglist'
    (bug#57327).
---
 lisp/progmodes/vhdl-mode.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/progmodes/vhdl-mode.el b/lisp/progmodes/vhdl-mode.el
index 39c5eb453b..18219db740 100644
--- a/lisp/progmodes/vhdl-mode.el
+++ b/lisp/progmodes/vhdl-mode.el
@@ -14958,8 +14958,8 @@ otherwise use cached data."
 
 (defun vhdl-speedbar-insert-hierarchy ( ent-alist-arg conf-alist-arg
                                         package-alist ent-inst-list depth)
-  "Insert hierarchy of ENT-ALIST, CONF-ALIST, and PACKAGE-ALIST."
-  (if (not (or ent-alist conf-alist package-alist))
+  "Insert hierarchy of ENT-ALIST-ARG, CONF-ALIST-ARG, and PACKAGE-ALIST."
+  (if (not (or ent-alist-arg conf-alist-arg package-alist))
       (vhdl-speedbar-make-title-line "No VHDL design units!" depth)
     (let ((ent-alist ent-alist-arg)
           (conf-alist conf-alist-arg)