diff lisp/process.el @ 333:4f79e16b1112 r21-0-64

Import from CVS: tag r21-0-64
author cvs
date Mon, 13 Aug 2007 10:49:50 +0200
parents 19dcec799385
children cc15677e0335
line wrap: on
line diff
--- a/lisp/process.el	Mon Aug 13 10:49:08 2007 +0200
+++ b/lisp/process.el	Mon Aug 13 10:49:50 2007 +0200
@@ -350,7 +350,7 @@
 process as a string"
   ;; by "William G. Dubuque" <wgd@zurich.ai.mit.edu>
   (with-output-to-string
-    (call-process shell-file-name nil t nil "-c" command)))
+    (call-process shell-file-name nil t nil shell-command-switch command)))
 
 (defalias 'shell-command-to-string 'exec-to-string)