From c8e8f4e3c2b1e0e8844a6ea60509f2de2e1e0612 Mon Sep 17 00:00:00 2001
From: Ihor Radchenko <yantar92@posteo.net>
Date: Thu, 4 May 2023 21:53:30 +0200
Subject: [PATCH] org-fold--reveal-headline-at-point: Fix edge case with
 invisible subtree

---
 lisp/org-fold.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/org-fold.el b/lisp/org-fold.el
index 991090113..859672061 100644
--- a/lisp/org-fold.el
+++ b/lisp/org-fold.el
@@ -767,7 +767,7 @@ Assume that point is located at the header line."
         (if (equal (point)
                    (save-excursion
                      (goto-char endl)
-                     (org-end-of-subtree)
+                     (org-end-of-subtree t)
                      (skip-chars-forward "\n\t\r ")))
             (point)
           endl)))