On 1/16/13 3:06 AM, Andreas Schwab wrote:
Kevin Rodgers<kevin.d.rodg...@gmail.com>  writes:

(defun run-emacs (command)
   "Run the Emacs COMMAND in the background via `shell-command'."
   (interactive
    (let ((program (expand-file-name invocation-name invocation-directory)))
      (list (read-string "Emacs command: "
                        (cons (concat program
                                      (if (cdr command-line-args)
                                          (mapconcat 'identity
                                                     (cdr command-line-args)

You need to use shell-quote-argument to properly shell-quote each
argument.

Thanks, Andreas!

--
Kevin Rodgers
Denver, Colorado, USA




Reply via email to