# HG changeset patch # User Eli Zaretskii # Date 1084268480 0 # Node ID 455a962a0dbaef2e773331fd0fd1dffc856e92a6 # Parent 2ac9e7728aa7b7a81b2a0d1a9920c940a6d54ec7 (rfc2368-parse-mailto-url): Make the results of parsing "mailto:addr1%2C%20addr2", "mailto:?to=addr1%2C%20addr2", and "mailto:addr1?to=addr2" equal. diff -r 2ac9e7728aa7 -r 455a962a0dba lisp/mail/rfc2368.el --- a/lisp/mail/rfc2368.el Tue May 11 09:30:25 2004 +0000 +++ b/lisp/mail/rfc2368.el Tue May 11 09:41:20 2004 +0000 @@ -120,12 +120,13 @@ ;; deal w/ multiple 'To' recipients (if prequery (progn + (setq prequery (rfc2368-unhexify-string prequery)) (if (assoc "To" headers-alist) (let* ((our-cons-cell (assoc "To" headers-alist)) (our-cdr (cdr our-cons-cell))) - (setcdr our-cons-cell (concat our-cdr ", " prequery))) + (setcdr our-cons-cell (concat prequery ", " our-cdr))) (setq headers-alist (cons (cons "To" prequery) headers-alist)))))