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

(cherry picked from commit 4d59608ec40d725c6d7ec57d02a81ea6c3641079)

diff --git a/lisp/outline.el b/lisp/outline.el
index c19ee9cf0f6af9d6a7cf6462eb5eb241b702e865..00bfb231302118795a1246b3f8782ba02238fd1d 100644 (file)
--- a/lisp/outline.el
+++ b/lisp/outline.el
@@ -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)