From 90c1e36a73e10f0b0c7fbbbada867c60eb59b2f5 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Sun, 6 Apr 2003 20:17:43 +0000 Subject: [PATCH] (dired-view-file): Let viewer program run asynchronously. --- lisp/dired.el | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/lisp/dired.el b/lisp/dired.el index db067c5da16..47feb3aa50b 100644 --- a/lisp/dired.el +++ b/lisp/dired.el @@ -1417,8 +1417,11 @@ see `dired-view-command-alist'. Otherwise, display it in another buffer." (if (string-match (car elt) file) (setq cmd (cdr elt)))) (if cmd - (dired-run-shell-command (concat cmd " " - (shell-quote-argument file))) + (call-process shell-file-name nil 0 nil + "-c" + (concat cmd " " + (shell-quote-argument file) + " &")) (view-file file)))))) (defun dired-find-file-other-window () -- 2.39.2