branch: externals/bug-hunter
commit c819db88b05aaba7c07a284821ad7c4828d27a75
Author: Artur Malabarba <[email protected]>
Commit: Artur Malabarba <[email protected]>
Call-process instead of shell-command.
---
bug-hunter.el | 7 +++----
1 file changed, 3 insertions(+), 4 deletions(-)
diff --git a/bug-hunter.el b/bug-hunter.el
index 41d809d..a8b300c 100644
--- a/bug-hunter.el
+++ b/bug-hunter.el
@@ -208,10 +208,9 @@ file.")
(print-level nil))
(with-temp-file file-name
(print (list 'prin1 form) (current-buffer)))
- (shell-command (concat (shell-quote-argument exec)
- " -Q --batch -l "
- (shell-quote-argument file-name))
- out-buf)
+ (call-process exec nil out-buf nil
+ "-Q" "--batch" "-l"
+ (shell-quote-argument file-name))
(with-current-buffer out-buf
(goto-char (point-max))
(forward-sexp -1)
