*** empty log message ***

[gnus] / lisp / gnus-vm.el

diff --git a/lisp/gnus-vm.el b/lisp/gnus-vm.el
index aab5a6e..d549de0 100644 (file)
--- a/lisp/gnus-vm.el
+++ b/lisp/gnus-vm.el
@@ -110,6 +110,10 @@ save those articles instead."
     ;; Remember the directory name to save articles.
     (setq gnus-newsgroup-last-mail folder)))
   
+(defun gnus-vm-mail-setup (to subject in-reply-to cc replybuffer actions)
+  (gnus-sendmail-mail-setup to subject in-reply-to cc replybuffer actions)
+  )
+
 (defun gnus-mail-forward-using-vm (&optional buffer)
   "Forward the current message to another user using vm."
   (let* ((gnus-buffer (or buffer (current-buffer)))