diff lisp/gnus/gnus-art.el @ 111672:7c6e6f2b3351

gnus-art.el (gnus-url-mailto): Do not downcase args.
author Katsumi Yamaoka <yamaoka@jpl.org>
date Mon, 22 Nov 2010 11:33:06 +0000
parents 3334777d733d
children a03d962cdb9e
line wrap: on
line diff
--- a/lisp/gnus/gnus-art.el	Mon Nov 22 09:09:41 2010 +0100
+++ b/lisp/gnus/gnus-art.el	Mon Nov 22 11:33:06 2010 +0000
@@ -8155,8 +8155,7 @@
 		  (if (string-match "^\\([^?]+\\)\\?\\(.*\\)" url)
 		      (concat "to=" (match-string 1 url) "&"
 			      (match-string 2 url))
-		    (concat "to=" url)))
-		t)
+		    (concat "to=" url))))
 	  subject (cdr-safe (assoc "subject" args)))
     (gnus-msg-mail)
     (while args