allout.el: fix subtree expose numbering bug

* lisp/allout.el (allout-process-exposed): Reverse the list of indices
properly so that the correct numbering for nodes in a subtree is used.
Avoid destructive reversing; the list may be a constant (literal).
This flaw was revealed by an ignored-return-value warning.
This commit is contained in:
Mattias Engdegård 2023-04-11 11:50:17 +02:00
parent ebac67129e
commit 5dab172a17

View file

@ -5390,7 +5390,7 @@ Defaults:
;; not specified -- default it:
(setq tobuf (concat "*" (buffer-name frombuf) " exposed*")))
(if (listp format)
(nreverse format))
(setq format (reverse format)))
(let* ((listified
(progn (set-buffer frombuf)