mirrors/org-mode
0
0
Fork 1
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-08-30 04:02:54 +00:00
Code Releases Activity

"file" results now correctly insert a file link

Browse source
This commit is contained in:
Eric Schulte 2009-07-16 18:17:51 -06:00
parent b932d2ed76
commit 29d910c5e2
2 changed files with 3 additions and 3 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
lisp/org-babel.el
View file

@ -388,7 +388,7 @@ relies on `org-babel-insert-result'."
RESULT, and the display being the `file-name-nondirectory' if
non-nil."
(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)
"Comment out region using the ': ' org example quote."

4
org-babel.org
View file

@ -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]])
#+srcname: implementing-ditaa
#+begin_src ditaa :results file :file blue.png
#+begin_src ditaa :results replace file :file blue.png
+---------+
| cBLU |
| |
@ -1972,7 +1972,7 @@ This could probably be added to [[file:lisp/org-babel-script.el][org-babel-scrip
#+end_src
#+resname: implementing-ditaa
[[blue.png][blue.png]]
[[file:blue.png][blue.png]]
*** TODO dot
(see [[* file result types][file result types]])