[O] [PATCH 1/3] Fix bug when narrowing to subtree with point at an inline task

[Nicolas Goaziou]

* lisp/org.el (org-narrow-to-subtree): ensure `org-back-to-heading'
  will move point to a real heading and not an inline task by wraping
  function into a org-with-limited-levels macro.
---
 lisp/org.el |   11 ++++++-----
 1 files changed, 6 insertions(+), 5 deletions(-)

diff --git a/lisp/org.el b/lisp/org.el
index a26a3ca..6e1be76 100644
--- a/lisp/org.el
+++ b/lisp/org.el
@@ -7566,11 +7566,12 @@ If yes, remember the marker and the distance to BEG."
   (interactive)
   (save-excursion
     (save-match-data
-      (narrow-to-region
-       (progn (org-back-to-heading t) (point))
-       (progn (org-end-of-subtree t t)
-             (if (and (org-on-heading-p) (not (eobp))) (backward-char 1))
-             (point))))))
+      (org-with-limited-levels
+       (narrow-to-region
+       (progn (org-back-to-heading t) (point))
+       (progn (org-end-of-subtree t t)
+              (if (and (org-on-heading-p) (not (eobp))) (backward-char 1))
+              (point)))))))
 
 (defun org-narrow-to-block ()
   "Narrow buffer to the current block."
-- 
1.7.4.1