From 5dab172a17320e93332ae6545738b37f4224f2de Mon Sep 17 00:00:00 2001 From: =?utf8?q?Mattias=20Engdeg=C3=A5rd?= Date: Tue, 11 Apr 2023 11:50:17 +0200 Subject: [PATCH] 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. --- lisp/allout.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/allout.el b/lisp/allout.el index 4d5d814ae01..be2fd632c69 100644 --- a/lisp/allout.el +++ b/lisp/allout.el @@ -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) -- 2.39.2