diff options
author | Kyle Meyer <kyle@kyleam.com> | 2022-07-24 16:24:24 -0400 |
---|---|---|
committer | Kyle Meyer <kyle@kyleam.com> | 2022-07-24 16:24:24 -0400 |
commit | ba70d0f77c52d471bceb2ad2cc7bc172db348abb (patch) | |
tree | a2a638dfaaf4cc61b590f1da7b5490dccbcbe03c /lisp/org/ob-tangle.el | |
parent | f7fd7bf477acfc65701065ec70c32dacb17e275a (diff) | |
download | emacs-ba70d0f77c52d471bceb2ad2cc7bc172db348abb.tar.gz emacs-ba70d0f77c52d471bceb2ad2cc7bc172db348abb.tar.bz2 emacs-ba70d0f77c52d471bceb2ad2cc7bc172db348abb.zip |
Update to Org 9.5.4-17-g6e991f
Diffstat (limited to 'lisp/org/ob-tangle.el')
-rw-r--r-- | lisp/org/ob-tangle.el | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/lisp/org/ob-tangle.el b/lisp/org/ob-tangle.el index 566258eba4a..525d27bc070 100644 --- a/lisp/org/ob-tangle.el +++ b/lisp/org/ob-tangle.el @@ -581,7 +581,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)))) |