procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

; * lisp/outline.el: Remove unused variable.

Browse source
This commit is contained in:
Juri Linkov 2024-06-10 09:39:41 +03:00
parent 1a5aa16066
commit 4d59608ec4
1 changed files with 2 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

6
lisp/outline.el
View file

@ -1708,8 +1708,7 @@ after reverting the buffer."
(outline-map-region
(lambda ()
(let* ((level (funcall outline-level))
(heading (buffer-substring-no-properties (pos-bol) (pos-eol)))
path)
(heading (buffer-substring-no-properties (pos-bol) (pos-eol))))
(while (and current-path (>= (cdar current-path) level))
(pop current-path))
(push (cons heading level) current-path)
@ -1730,8 +1729,7 @@ hidden by `outline-hidden-headings-paths'."
(outline-map-region
(lambda ()
(let* ((level (funcall outline-level))
(heading (buffer-substring (pos-bol) (pos-eol)))
path)
(heading (buffer-substring (pos-bol) (pos-eol))))
(while (and current-path (>= (cdar current-path) level))
(pop current-path))
(push (cons heading level) current-path)