alx/mu4e
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

* mu4e-view.el: fix open-with for files with spaces in their name

Browse Source
This commit is contained in:
djcb
2012-05-03 07:53:41 +03:00
parent 0eb205b1e6
commit cd281fc696
1 changed files with 13 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
emacs/mu4e-view.el
View File

@ -740,7 +740,7 @@ user for it."
"History list for the pipe argument.")
(defun mu4e-view-pipe-attachment (msg attachnum &optional pipecmd)
"Feed MSG's attachment ATTACHNUM throught pipe PIPECMD; if
"Feed MSG's attachment ATTACHNUM through pipe PIPECMD; if
PIPECMD is nil, ask user for it."
(interactive)
(let* ((att (mu4e~view-get-attach msg attachnum))
@ -783,11 +783,11 @@ attachments) in response to a (mu4e~proc-extract 'temp ... )."
(cond
((string= what "open-with")
;; 'param' will be the program to open-with
(start-file-process-shell-command "*mu4e-open-with*" nil
(concat param " " path)))
(start-process "*mu4e-open-with-proc*" "*mu4e-open-with*" param path))
((string= what "pipe")
;; 'param' will be the pipe command, path the infile for this
(mu4e-process-file-through-pipe path param))
(mu4e-process-file-through-pipe path
(shell-quote-argument param)))
((string= what "emacs")
(find-file path)
;; make the buffer read-only since it usually does not make