From 9798da77b29b2dcd2d46a663e62c7c710936f4eb Mon Sep 17 00:00:00 2001
From: Nicolas Goaziou <mail@nicolasgoaziou.fr>
Date: Sun, 31 Jul 2016 00:20:35 +0200
Subject: [PATCH] Fix `org-map-tree' when called in an invisible heading

* lisp/org.el (org-map-tree): Move to closest heading above even if it
  is invisible.

Suggested-by: talwrii talwrii <talwrii@gmail.com>
<http://permalink.gmane.org/gmane.emacs.orgmode/108590>
---
 lisp/org.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lisp/org.el b/lisp/org.el
index 05432bbf5..459e9a1bd 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -8406,7 +8406,7 @@ After top level, it switches back to sibling level."
 
 (defun org-map-tree (fun)
   "Call FUN for every heading underneath the current one."
-  (org-back-to-heading)
+  (org-back-to-heading t)
   (let ((level (funcall outline-level)))
     (save-excursion
       (funcall fun)
-- 
2.11.4.GIT