From e5d5ab915eb4309082a4a274170fddc60a75c28b Mon Sep 17 00:00:00 2001 Message-ID: From: Ihor Radchenko Date: Mon, 27 Nov 2023 20:54:42 +0100 Subject: [PATCH] lisp/org.el (org-in-src-block-p): Improve docstring * lisp/org.el (org-in-src-block-p): Reported-by: No Wayman Link: https://orgmode.org/list/87il5n9owq.fsf@gmail.com --- lisp/org.el | 10 +++++++--- 1 file changed, 7 insertions(+), 3 deletions(-) diff --git a/lisp/org.el b/lisp/org.el index d2cd0b9b7..19887ff1e 100644 --- a/lisp/org.el +++ b/lisp/org.el @@ -18786,9 +18786,13 @@ (defun org-quote-vert (s) s) (defun org-in-src-block-p (&optional inside element) - "Whether point is in a code source block. -When INSIDE is non-nil, don't consider we are within a source -block when point is at #+BEGIN_SRC or #+END_SRC. + "Return t when point is at a source block element. +When INSIDE is non-nil, return t only when point is between #+BEGIN_SRC +and #+END_SRC lines. + +Note that affiliated keywords and blank lines after are considered a +part of a source block. + When ELEMENT is provided, it is considered to be element at point." (save-match-data (setq element (or element (org-element-at-point)))) (when (org-element-type-p element 'src-block) -- 2.42.0