open file in new session, new process

This commit is contained in:
C.Li 2013-08-07 20:49:21 +08:00
parent 578a92e004
commit 5eb8bf5143

View file

@ -41,13 +41,14 @@
With a prefix ARG always prompt for command to use." With a prefix ARG always prompt for command to use."
(interactive "P") (interactive "P")
(when buffer-file-name (when buffer-file-name
(shell-command (concat (start-process "prelude-open-with-processes"
"external-file-buffer"
"setsid"
(cond (cond
((and (not arg) (eq system-type 'darwin)) "open") ((and (not arg) (eq system-type 'darwin)) "open")
((and (not arg) (member system-type '(gnu gnu/linux gnu/kfreebsd))) "xdg-open") ((and (not arg) (member system-type '(gnu gnu/linux gnu/kfreebsd))) "xdg-open")
(t (read-shell-command "Open current file with: "))) (t (read-shell-command "Open current file with: ")))
" " (shell-quote-argument buffer-file-name))))
(shell-quote-argument buffer-file-name)))))
(defun prelude-buffer-mode (buffer-or-name) (defun prelude-buffer-mode (buffer-or-name)
"Retrieve the `major-mode' of BUFFER-OR-NAME." "Retrieve the `major-mode' of BUFFER-OR-NAME."