[gnus git] branch master updated: =2= (message-reply): Take an optional switch-buffer parameter so that Gnus window confs are respected better. ; Indent.

Lars Ingebrigtsen <[email protected]>
Newsgroups gmane.emacs.gnus.cvs
Message-ID <[email protected]>
       via  b2ea476e0bc6e2973976b376c15be5381fe3127f (commit)
       via  1132a4961451051218a8f108bf86af028d4d84d2 (commit)
      from  8bba88d8ff914135dbeac96d1ad7d7f7ba313b12 (commit)


- Log -----------------------------------------------------------------
commit b2ea476e0bc6e2973976b376c15be5381fe3127f
Author: Lars Ingebrigtsen <[email protected]>
Date:   Mon Feb 14 12:36:58 2011 -0800

    (message-reply): Take an optional switch-buffer parameter so that Gnus window confs are respected better.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 0bfa2b0..6dc0c60 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2011-02-14  Lars Ingebrigtsen  <[email protected]>
+
+	* message.el (message-reply): Take an optional switch-buffer parameter
+	so that Gnus window confs are respected better.
+
 2011-02-14  Teodor Zlatanov  <[email protected]>
 
 	* auth-source.el (auth-source-backend-parse-parameters): Don't rely on
diff --git a/lisp/gnus-msg.el b/lisp/gnus-msg.el
index f64553a..b199dcc 100644
--- a/lisp/gnus-msg.el
+++ b/lisp/gnus-msg.el
@@ -1123,7 +1123,7 @@ If VERY-WIDE, make a very wide reply."
 	    (insert headers))
 	  (goto-char (point-max)))
 	(mml-quote-region (point) (point-max))
-	(message-reply nil wide)
+	(message-reply nil wide 'switch-to-buffer)
 	(when yank
 	  (gnus-inews-yank-articles yank))
 	(gnus-summary-handle-replysign)))))
diff --git a/lisp/message.el b/lisp/message.el
index bfe07e6..c8a706e 100644
--- a/lisp/message.el
+++ b/lisp/message.el
@@ -6823,7 +6823,7 @@ Useful functions to put in this list include:
   subject)
 
 ;;;###autoload
-(defun message-reply (&optional to-address wide)
+(defun message-reply (&optional to-address wide switch-function)
   "Start editing a reply to the article in the current buffer."
   (interactive)
   (require 'gnus-sum)			; for gnus-list-identifiers
@@ -6866,7 +6866,8 @@ Useful functions to put in this list include:
       (message-pop-to-buffer
        (message-buffer-name
 	(if wide "wide reply" "reply") from
-	(if wide to-address nil))))
+	(if wide to-address nil))
+       switch-function))
 
     (setq message-reply-headers
 	  (vector 0 subject from date message-id references 0 0 ""))

commit 1132a4961451051218a8f108bf86af028d4d84d2
Author: Lars Ingebrigtsen <[email protected]>
Date:   Mon Feb 14 12:23:48 2011 -0800

    Indent.

diff --git a/lisp/gnus-msg.el b/lisp/gnus-msg.el
index 08fef23..f64553a 100644
--- a/lisp/gnus-msg.el
+++ b/lisp/gnus-msg.el
@@ -1081,14 +1081,14 @@ If VERY-WIDE, make a very wide reply."
 	      (gnus-summary-work-articles 1))))
   ;; Allow user to require confirmation before replying by mail to the
   ;; author of a news article (or mail message).
-  (when (or
-	    (not (or (gnus-news-group-p gnus-newsgroup-name)
+  (when (or (not (or (gnus-news-group-p gnus-newsgroup-name)
 		     gnus-confirm-treat-mail-like-news))
 	    (not (cond ((stringp gnus-confirm-mail-reply-to-news)
 			(string-match gnus-confirm-mail-reply-to-news
 				      gnus-newsgroup-name))
 		       ((functionp gnus-confirm-mail-reply-to-news)
-			(funcall gnus-confirm-mail-reply-to-news gnus-newsgroup-name))
+			(funcall gnus-confirm-mail-reply-to-news
+				 gnus-newsgroup-name))
 		       (t gnus-confirm-mail-reply-to-news)))
 	    (if (or wide very-wide)
 		t ;; Ignore gnus-confirm-mail-reply-to-news for wide and very

-----------------------------------------------------------------------
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 |    8 ++++----
 lisp/message.el  |    5 +++--
 3 files changed, 12 insertions(+), 6 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
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.