Fix mistake in Lisp conversion of describe-map-tree

* lisp/help.el (describe-map-tree): Fix mistake in conversion to Lisp
from the C function describe_map_tree; make the condition match the
now removed C code.  (Bug#44360)
This commit is contained in:
Stefan Kangas 2020-11-01 22:49:12 +01:00
parent 030ab2dad5
commit 5ab5504def

View file

@ -1189,8 +1189,8 @@ Any inserted text ends in two newlines (used by
;; map.
(or (keymapp sub-shadows)
(null sub-shadows)
(consp sub-shadows)
(not (keymapp (car sub-shadows)))))
(and (consp sub-shadows)
(keymapp (car sub-shadows)))))
;; Maps we have already listed in this loop shadow this map.
(let ((tail orig-maps))
(while (not (equal tail maps))