mirror of
https://git.savannah.gnu.org/git/emacs/org-mode.git
synced 2024-09-18 10:10:01 +00:00
"file" results now correctly insert a file link
This commit is contained in:
parent
b932d2ed76
commit
29d910c5e2
|
@ -388,7 +388,7 @@ relies on `org-babel-insert-result'."
|
||||||
RESULT, and the display being the `file-name-nondirectory' if
|
RESULT, and the display being the `file-name-nondirectory' if
|
||||||
non-nil."
|
non-nil."
|
||||||
(let ((name (file-name-nondirectory result)))
|
(let ((name (file-name-nondirectory result)))
|
||||||
(concat "[[" result (if name (concat "][" name "]]") "]]"))))
|
(concat "[[file:" result (if name (concat "][" name "]]") "]]"))))
|
||||||
|
|
||||||
(defun org-babel-examplize-region (beg end)
|
(defun org-babel-examplize-region (beg end)
|
||||||
"Comment out region using the ': ' org example quote."
|
"Comment out region using the ': ' org example quote."
|
||||||
|
|
|
@ -1961,7 +1961,7 @@ This could probably be added to [[file:lisp/org-babel-script.el][org-babel-scrip
|
||||||
(see [[* file result types][file result types]])
|
(see [[* file result types][file result types]])
|
||||||
|
|
||||||
#+srcname: implementing-ditaa
|
#+srcname: implementing-ditaa
|
||||||
#+begin_src ditaa :results file :file blue.png
|
#+begin_src ditaa :results replace file :file blue.png
|
||||||
+---------+
|
+---------+
|
||||||
| cBLU |
|
| cBLU |
|
||||||
| |
|
| |
|
||||||
|
@ -1972,7 +1972,7 @@ This could probably be added to [[file:lisp/org-babel-script.el][org-babel-scrip
|
||||||
#+end_src
|
#+end_src
|
||||||
|
|
||||||
#+resname: implementing-ditaa
|
#+resname: implementing-ditaa
|
||||||
[[blue.png][blue.png]]
|
[[file:blue.png][blue.png]]
|
||||||
|
|
||||||
*** TODO dot
|
*** TODO dot
|
||||||
(see [[* file result types][file result types]])
|
(see [[* file result types][file result types]])
|
||||||
|
|
Loading…
Reference in a new issue