[gnus git] branch master updated: m0-11-102-g4731fcd =2= Merge branch 'master' of https://git.gnus.org/gnus ; Start collecting a newsrc

       via  4731fcde9abbae525b64ac6b92a0393e6661b431 (commit)
       via  8063a0fb06c07d65f346e818b96923a2e558a331 (commit)
      from  0a4cd14e60d05f51a0fb3dd65aa722884a9f5eaa (commit)


- Log -----------------------------------------------------------------
commit 4731fcde9abbae525b64ac6b92a0393e6661b431
Merge: 8063a0f 0a4cd14
Author: Lars Ingebrigtsen <[email protected]>
Date:   Sun Dec 28 14:51:38 2014 +0100

    Merge branch 'master' of https://git.gnus.org/gnus


commit 8063a0fb06c07d65f346e818b96923a2e558a331
Author: Lars Ingebrigtsen <[email protected]>
Date:   Wed Jul 2 16:26:02 2014 +0200

    Start collecting a newsrc

diff --git a/lisp/gnus-cloud.el b/lisp/gnus-cloud.el
index c47976b..8acea09 100644
--- a/lisp/gnus-cloud.el
+++ b/lisp/gnus-cloud.el
@@ -327,6 +327,15 @@
 (defun gnus-cloud-server-p (server)
   (member server gnus-cloud-covered-servers))
 
+(defun gnus-cloud-collect-full-newsrc ()
+  (let ((infos nil))
+    (dolist (info (cdr gnus-newsrc-alist))
+      (when (gnus-cloud-server-p
+	     (gnus-method-to-server
+	      (gnus-find-method-for-group (gnus-info-group info))))
+	(push info infos)))
+    ))
+
 (provide 'gnus-cloud)
 
 ;;; gnus-cloud.el ends here

-----------------------------------------------------------------------
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/gnus-cloud.el |    9 +++++++++
 1 file changed, 9 insertions(+)

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