[gnus git] branch master updated: m0-5-195-gc55bbf6 =1= (gnus-finish-retrieve-group-infos): Add backend tracing.

       via  c55bbf686865c53a896d7829e855d7317c2e5828 (commit)
      from  7895ebeb42cac9a78d9c7de6485e861e3047e011 (commit)


- Log -----------------------------------------------------------------
commit c55bbf686865c53a896d7829e855d7317c2e5828
Author: Lars Ingebrigtsen <[email protected]>
Date:   Sun Dec 23 08:52:07 2012 +0100

    (gnus-finish-retrieve-group-infos): Add backend tracing.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index cfd3774..24aa9e9 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -3,6 +3,7 @@
 	* gnus-int.el (gnus-backend-trace): Factor out into its own function
 	for reuse.
 	(gnus-open-server): Use it to add more tracing.
+	(gnus-finish-retrieve-group-infos): Add backend tracing.
 
 2012-12-22  Philipp Haselwarter <[email protected]>
 
diff --git a/lisp/gnus-int.el b/lisp/gnus-int.el
index 101c29c..b692299 100644
--- a/lisp/gnus-int.el
+++ b/lisp/gnus-int.el
@@ -356,9 +356,13 @@ If it is down, start it up (again)."
   "Read and update infos from GNUS-COMMAND-METHOD."
   (when (stringp gnus-command-method)
     (setq gnus-command-method (gnus-server-to-method gnus-command-method)))
-  (funcall (gnus-get-function gnus-command-method 'finish-retrieve-group-infos)
+  (gnus-backend-trace :finishing gnus-command-method)
+  (prog1
+      (funcall (gnus-get-function gnus-command-method
+				  'finish-retrieve-group-infos)
 	   (nth 1 gnus-command-method)
-	   infos data))
+	       infos data)
+    (gnus-backend-trace :finished gnus-command-method)))
 
 (defun gnus-retrieve-group-data-early (gnus-command-method infos)
   "Start early async retrieval of data from GNUS-COMMAND-METHOD."

-----------------------------------------------------------------------
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   |    1 +
 lisp/gnus-int.el |   10 +++++++---
 2 files changed, 8 insertions(+), 3 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