gnus-art: do not downcase mailto args

Signed-off-by: Julien Danjou <julien@danjou.info>

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 231aa9d..451abc4 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2010-11-22  Julien Danjou  <julien@danjou.info>
+
+       * gnus-art.el (gnus-url-mailto): Do not downcase args.
+
 2010-11-21  Andrew Cohen  <cohen@andy.bu.edu>
 
        * nnir.el: Fix typo in comments.

diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el
index 51d3246..53d82ca 100644 (file)
--- a/lisp/gnus-art.el
+++ b/lisp/gnus-art.el
@@ -8155,8 +8155,7 @@ url is put as the `gnus-button-url' overlay property on the button."
                  (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