ndwarshuis
/
org-mode
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

* lisp/org.el (org-open-file): Print shell command used to open file

This commit is contained in:
Jambunathan K 2012-09-03 02:57:13 +05:30
parent 5681a04cc2
commit b9270bf46f
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
lisp/org.el
View File

@ -10545,9 +10545,9 @@ If the file does not exist, an error is thrown."
(setq match-index (+ match-index 1))))) (setq match-index (+ match-index 1)))))
(save-window-excursion (save-window-excursion
(message "Running %s...done" cmd)
(start-process-shell-command cmd nil cmd) (start-process-shell-command cmd nil cmd)
(and (boundp 'org-wait) (numberp org-wait) (sit-for org-wait)) (and (boundp 'org-wait) (numberp org-wait) (sit-for org-wait))))
))
((or (stringp cmd) ((or (stringp cmd)
(eq cmd 'emacs)) (eq cmd 'emacs))
(funcall (cdr (assq 'file org-link-frame-setup)) file) (funcall (cdr (assq 'file org-link-frame-setup)) file)