(setq prequery
(match-string rfc2368-mailto-prequery-index mailto-url))
-
+
(setq query
(match-string rfc2368-mailto-query-index mailto-url))
(setcdr our-cons-cell (concat our-cdr ", " prequery)))
(setq headers-alist
(cons (cons "To" prequery) headers-alist)))))
-
+
headers-alist)
-
+
(error "Failed to match a mailto: url"))
))