emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/org b5cfc311db 2/2: org-babel-ref-resolve: Search curre


From: ELPA Syncer
Subject: [elpa] externals/org b5cfc311db 2/2: org-babel-ref-resolve: Search current buffer when FILE in FILE:REF does not exist
Date: Fri, 10 Nov 2023 06:58:20 -0500 (EST)

branch: externals/org
commit b5cfc311db9f871ef545277aff9f296c5d2e7ab4
Author: Ihor Radchenko <yantar92@posteo.net>
Commit: Ihor Radchenko <yantar92@posteo.net>

    org-babel-ref-resolve: Search current buffer when FILE in FILE:REF does not 
exist
    
    * lisp/ob-ref.el (org-babel-ref-resolve): Only search in other file
    when FILE in FILE:REF exists.
    * doc/org-manual.org (Passing arguments):
    * etc/ORG-NEWS (Babel references =FILE:REFERENCE= now search current
    buffer when =FILE= does not exist): Document the change.
    
    Reported-by: Stefano Ghirlanda <dr.ghirlanda@gmail.com>
    Link: 
https://orgmode.org/list/CAK_gY-Q4f82dbDQgyS+FfyeQaHAMXHqygq3e6ZsWnEj-+eoG9A@mail.gmail.com
---
 doc/org-manual.org | 4 ++++
 etc/ORG-NEWS       | 6 ++++++
 lisp/ob-ref.el     | 5 +++--
 3 files changed, 13 insertions(+), 2 deletions(-)

diff --git a/doc/org-manual.org b/doc/org-manual.org
index c332f90f1a..8813f49449 100644
--- a/doc/org-manual.org
+++ b/doc/org-manual.org
@@ -17806,6 +17806,10 @@ from the reference.
 
 : :var NAME=FILE:REFERENCE
 
+When =FILE= does not exist, the reference is searched in the current
+file, using the verbatim reference.  This way,
+=:var table=tbl:example= will be searched inside the current buffer.
+
 Here are examples of passing values by reference:
 
 - table ::
diff --git a/etc/ORG-NEWS b/etc/ORG-NEWS
index 19117821aa..1207d6fca9 100644
--- a/etc/ORG-NEWS
+++ b/etc/ORG-NEWS
@@ -13,6 +13,12 @@ Please send Org bug reports to mailto:emacs-orgmode@gnu.org.
 
 * Version 9.7 (not released yet)
 ** Important announcements and breaking changes
+*** Babel references =FILE:REFERENCE= now search current buffer when =FILE= 
does not exist
+
+When =FILE= does not exist, the reference is searched in the current
+file, using the verbatim reference.  This way,
+=:var table=tbl:example= will be searched inside the current buffer.
+
 *** New export option ~org-export-expand-links~
 
 The new option makes Org expand environment variables in link and INCLUDE 
paths.
diff --git a/lisp/ob-ref.el b/lisp/ob-ref.el
index fd6927ccfe..b7858569a7 100644
--- a/lisp/ob-ref.el
+++ b/lisp/ob-ref.el
@@ -156,8 +156,9 @@ Emacs Lisp representation of the value of the variable."
          (when (string-match "^\\(.+\\):\\(.+\\)$" ref)
            (setq split-file (match-string 1 ref))
            (setq split-ref (match-string 2 ref))
-           (find-file split-file)
-           (setq ref split-ref))
+            (when (file-exists-p split-file)
+             (find-file split-file)
+             (setq ref split-ref)))
          (org-with-wide-buffer
           (goto-char (point-min))
           (let* ((params (append args '((:results . "none"))))



reply via email to

[Prev in Thread] Current Thread [Next in Thread]