branch: externals/org
commit 9d70929fd77d2cc5aed10e1387f9879c69fb031f
Merge: 466c180a47 b8497aa7fe
Author: Ihor Radchenko <yanta...@posteo.net>
Commit: Ihor Radchenko <yanta...@posteo.net>

    Merge branch 'bugfix'
---
 lisp/org-lint.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lisp/org-lint.el b/lisp/org-lint.el
index 9d105175c2..39f0d67c14 100644
--- a/lisp/org-lint.el
+++ b/lisp/org-lint.el
@@ -395,7 +395,8 @@ called with one argument, the key used for comparison."
       ;; Heuristics for 2+ level heading not at bol.
       (while (re-search-forward (rx (not (any "*\n\r ,")) ;; Not a bol; not 
escaped ,** heading; not " *** words"
                                     "*" (1+ "*") " ") nil t)
-        (push (list (match-beginning 0) "Possibly misplaced heading line") 
result))
+        (unless (org-at-block-p) ; Inside a block, where the chances to have 
heading a slim.
+          (push (list (match-beginning 0) "Possibly misplaced heading line") 
result)))
       result)))
 
 (defun org-lint-duplicate-custom-id (ast)

Reply via email to