[gnus git] branch master updated: n0-17-89-ge9ec767 =1= New command `gnus-summary-reply-to-list-with-original'.

       via  e9ec7671168ff4f308feb00f08683042639c47df (commit)
      from  eb5df6520fbe0f3bf634382f8eb749a6f23a1437 (commit)


- Log -----------------------------------------------------------------
commit e9ec7671168ff4f308feb00f08683042639c47df
Author: Lars Magne Ingebrigtsen <[email protected]>
Date:   Sun Jun 26 12:03:35 2011 +0200

    New command `gnus-summary-reply-to-list-with-original'.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 4c58790..0e4fca9 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2011-06-26  Timo Juhani Lindfors <[email protected]>  (tiny change)
+
+	* gnus-msg.el (gnus-summary-reply-to-list-with-original): New command
+	and keystroke.
+
 2011-06-23  Katsumi Yamaoka  <[email protected]>
 
 	* auth-source.el (auth-source-netrc-cache): Move forward.
diff --git a/lisp/gnus-msg.el b/lisp/gnus-msg.el
index 093eec3..e256446 100644
--- a/lisp/gnus-msg.el
+++ b/lisp/gnus-msg.el
@@ -351,6 +351,7 @@ Thank you for your help in stamping out bugs.
   "r" gnus-summary-reply
   "y" gnus-summary-yank-message
   "R" gnus-summary-reply-with-original
+  "L" gnus-summary-reply-to-list-with-original
   "w" gnus-summary-wide-reply
   "W" gnus-summary-wide-reply-with-original
   "v" gnus-summary-very-wide-reply
@@ -1154,6 +1155,16 @@ The original article will be yanked."
   (interactive "P")
   (gnus-summary-reply (gnus-summary-work-articles n) wide))
 
+(defun gnus-summary-reply-to-list-with-original (n &optional wide)
+  "Start composing a reply mail to the current message.
+The reply goes only to the mailing list.
+The original article will be yanked."
+  (interactive "P")
+  (let ((message-reply-to-function
+	 (lambda nil
+	   `((To . ,(gnus-mailing-list-followup-to))))))
+    (gnus-summary-reply (gnus-summary-work-articles n) wide)))
+
 (defun gnus-summary-reply-broken-reply-to (&optional yank wide very-wide)
   "Like `gnus-summary-reply' except removing reply-to field.
 If prefix argument YANK is non-nil, the original article is yanked
diff --git a/texi/ChangeLog b/texi/ChangeLog
index 2b31a56..295dcd4 100644
--- a/texi/ChangeLog
+++ b/texi/ChangeLog
@@ -1,3 +1,8 @@
+2011-06-26  Lars Magne Ingebrigtsen  <[email protected]>
+
+	* gnus.texi (Summary Mail Commands): Document
+	`gnus-summary-reply-to-list-with-original'.
+
 2011-05-31  Teodor Zlatanov  <[email protected]>
 
 	* gnus.texi (Store custom flags and keywords): Refer to
diff --git a/texi/gnus.texi b/texi/gnus.texi
index a61b5b1..8350be7 100644
--- a/texi/gnus.texi
+++ b/texi/gnus.texi
@@ -5568,6 +5568,13 @@ message (@code{gnus-summary-wide-reply-with-original}).  This command uses
 the process/prefix convention, but only uses the headers from the
 first article to determine the recipients.
 
+@item S L
+@kindex S L (Summary)
+@findex gnus-summary-reply-to-list-with-original
+When replying to a message from a mailing list, send a reply to that
+message to the mailing list, and include the original message
+(@code{gnus-summary-reply-to-list-with-original}).
+
 @item S v
 @kindex S v (Summary)
 @findex gnus-summary-very-wide-reply

-----------------------------------------------------------------------
Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we listed those
revisions in full, above.

Summary of changes:
 lisp/ChangeLog   |    5 +++++
 lisp/gnus-msg.el |   11 +++++++++++
 texi/ChangeLog   |    5 +++++
 texi/gnus.texi   |    7 +++++++
 4 files changed, 28 insertions(+), 0 deletions(-)

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "Gnus Project".

The branch, master has been updated


hooks/post-receive
-- 
Gnus Project