* Re: [PATCH] Attached images with spaces in the filename
[not found] <87ptrwevgw.fsf@bearteam.org>
@ 2002-12-20 12:48 ` Laurent Martelli
0 siblings, 0 replies; only message in thread
From: Laurent Martelli @ 2002-12-20 12:48 UTC (permalink / raw)
I finally hacked a few minutes and come with this patch for
mm-decode.el:
*** /usr/share/emacs/site-lisp/mm-decode.el 2002-08-24 13:53:41.000000000 +0200
--- elisp/mm-decode.el 2002-12-20 13:41:36.000000000 +0100
***************
*** 774,780 ****
(beg 0)
(uses-stdin t)
out sub total)
! (while (string-match "%{\\([^}]+\\)}\\|%s\\|%t\\|%%" method beg)
(push (substring method beg (match-beginning 0)) out)
(setq beg (match-end 0)
total (match-string 0 method)
--- 776,782 ----
(beg 0)
(uses-stdin t)
out sub total)
! (while (string-match "%{\\([^}]+\\)}\\|'%s'\\|%s\\|%t\\|%%" method beg)
(push (substring method beg (match-beginning 0)) out)
(setq beg (match-end 0)
total (match-string 0 method)
***************
*** 782,788 ****
(cond
((string= total "%%")
(push "%" out))
! ((string= total "%s")
(setq uses-stdin nil)
(push (mm-quote-arg
(gnus-map-function mm-path-name-rewrite-functions file)) out))
--- 784,790 ----
(cond
((string= total "%%")
(push "%" out))
! ((or (string= total "%s") (string= total "'%s'"))
(setq uses-stdin nil)
(push (mm-quote-arg
(gnus-map-function mm-path-name-rewrite-functions file)) out))
--
Laurent Martelli http://jac.aopsys.com/
laurent@bearteam.org http://www.bearteam.org/~laurent/
^ permalink raw reply [flat|nested] only message in thread
only message in thread, other threads:[~2002-12-20 12:48 UTC | newest]
Thread overview: (only message) (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
[not found] <87ptrwevgw.fsf@bearteam.org>
2002-12-20 12:48 ` [PATCH] Attached images with spaces in the filename Laurent Martelli
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).