From b99c10dc52b3b6b182a3dc937f53277d6c4a2c8d Mon Sep 17 00:00:00 2001 From: Andreas Gerler Date: Tue, 18 Jun 2024 14:50:57 +0200 Subject: [PATCH] fix bba-copy-and-yank-org-src-block * bba-orgmode.org: fix search for begin_src. Signed-off-by: Andreas Gerler --- bba-orgmode.org | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/bba-orgmode.org b/bba-orgmode.org index f7c4850e..6761d4e7 100644 --- a/bba-orgmode.org +++ b/bba-orgmode.org @@ -807,8 +807,8 @@ This is helpful in training sessions. (push-mark) (re-search-backward "\#\\+BEGIN_SRC") (forward-line -1) - (if (looking-at "\#\\+RESULTS:")(re-search-backward "\#\\+BEGIN_SRC")) - (forward-line -1) + (if (looking-at "\#\\+RESULTS:")(progn (re-search-backward "\#\\+BEGIN_SRC") + (forward-line -1))) (if (not (looking-at "\#"))(forward-line)) (set-mark-command nil) (re-search-forward "\#\\+END_SRC") -- 2.47.3