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)