1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-11 09:20:51 +00:00

Keep Man sections in natural order (bug#28998)

* lisp/man.el (Man-build-section-alist): Reverse sections.
This commit is contained in:
Basil L. Contovounesios 2017-10-25 16:57:43 +01:00 committed by Noam Postavsky
parent d63c9a96f5
commit 9533d76b0b

View File

@ -1522,7 +1522,8 @@ The following key bindings are currently in effect in the buffer:
(let ((section (match-string 1))) (let ((section (match-string 1)))
(unless (member section Man--sections) (unless (member section Man--sections)
(push section Man--sections))) (push section Man--sections)))
(forward-line 1)))) (forward-line 1)))
(setq Man--sections (nreverse Man--sections)))
(defsubst Man-build-references-alist () (defsubst Man-build-references-alist ()
"Build the list of references (in the SEE ALSO section)." "Build the list of references (in the SEE ALSO section)."