[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/org 6c1e3dfa28: Merge branch 'bugfix'
From: |
ELPA Syncer |
Subject: |
[elpa] externals/org 6c1e3dfa28: Merge branch 'bugfix' |
Date: |
Fri, 22 Jul 2022 22:57:46 -0400 (EDT) |
branch: externals/org
commit 6c1e3dfa28beaef7c5926e6b265186465c71e67f
Merge: b6098500ae c779b7aa0e
Author: Ihor Radchenko <yantar92@gmail.com>
Commit: Ihor Radchenko <yantar92@gmail.com>
Merge branch 'bugfix'
---
lisp/ob-tangle.el | 5 ++++-
1 file changed, 4 insertions(+), 1 deletion(-)
diff --git a/lisp/ob-tangle.el b/lisp/ob-tangle.el
index f4fb2af719..fdba72278f 100644
--- a/lisp/ob-tangle.el
+++ b/lisp/ob-tangle.el
@@ -638,7 +638,10 @@ which enable the original code blocks to be found."
(error "Not in tangled code"))
(setq body (buffer-substring body-start end)))
;; Go to the beginning of the relative block in Org file.
- (org-link-open-from-string link)
+ ;; Explicitly allow fuzzy search even if user customized
+ ;; otherwise.
+ (let (org-link-search-must-match-exact-headline)
+ (org-link-open-from-string link))
(setq target-buffer (current-buffer))
(if (string-match "[^ \t\n\r]:\\([[:digit:]]+\\)" block-name)
(let ((n (string-to-number (match-string 1 block-name))))