Преглед на файлове

simplified insertion of file links (makes for better image export)

Eric Schulte преди 16 години
родител
ревизия
d45e3d318f
променени са 1 файла, в които са добавени 1 реда и са изтрити 2 реда
  1. 1 2
      lisp/org-babel.el

+ 1 - 2
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."