From d45e3d318ffa171d26a52ad397a3a174f9a0a42d Mon Sep 17 00:00:00 2001 From: Eric Schulte Date: Tue, 1 Sep 2009 15:14:45 -0600 Subject: [PATCH] simplified insertion of file links (makes for better image export) --- lisp/org-babel.el | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/lisp/org-babel.el b/lisp/org-babel.el index 31c27b4b8..bf1b78bdb 100644 --- a/lisp/org-babel.el +++ b/lisp/org-babel.el @@ -601,8 +601,7 @@ relies on `org-babel-insert-result'." "Return an `org-mode' link with the path being the value or RESULT, and the display being the `file-name-nondirectory' if non-nil." - (let ((name (file-name-nondirectory result))) - (concat "[[file:" result (if name (concat "][" name "]]") "]]")))) + (concat "[[file:" result "]]")) (defun org-babel-examplize-region (beg end) "Comment out region using the ': ' org example quote." -- 2.11.4.GIT