(message-mailto): Should accept other parameters.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 52f4e56..ce0e63d 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,6 +1,7 @@
 2010-11-08  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
        * message.el (message-mailto): New function.
+       (message-mailto): Should accept other parameters.
 
 2010-11-07  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 

diff --git a/lisp/message.el b/lisp/message.el
index 4de2c20..22bf45b 100644 (file)
--- a/lisp/message.el
+++ b/lisp/message.el
@@ -6552,7 +6552,7 @@ is a function used to switch to and display the mail buffer."
     t))
 
 ;;;###autoload
-(defun message-mailto (url)
+(defun message-mailto (url &rest args)
   "Send a mail message to URL.
 The URL should be on the form \"mailto:<address>?params\"."
   (when (string-match "\\`mailto:" url)