[gnus git] branch master updated: n0-17-360-g6774910 =1= * gnus-sync.el: (gnus-sync-save): Don't use `apply-partially' because of XEmacs.

Ted Zlatanov <[email protected]>
Newsgroups gmane.emacs.gnus.cvs
Message-ID <[email protected]>
       via  677491094aa901592a00e4c3c637591530e2ce4c (commit)
      from  97bed317c02685999bcbcc23a78e07c4fad1a7c3 (commit)


- Log -----------------------------------------------------------------
commit 677491094aa901592a00e4c3c637591530e2ce4c
Author: Ted Zlatanov <[email protected]>
Date:   Thu Oct 27 20:05:34 2011 -0400

    * gnus-sync.el: (gnus-sync-save): Don't use `apply-partially' because of XEmacs.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index d6cb29c..03427fe 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -8,6 +8,7 @@
 	position within the topic) are saved.  This is an experimental backend
 	and may change significantly.  Load json.el from the gnus-fallback-lib
 	if it's not available otherwise.
+	(gnus-sync-save): Don't use `apply-partially' because of XEmacs.
 
 2011-10-26  Stefan Monnier  <[email protected]>
 
diff --git a/lisp/gnus-sync.el b/lisp/gnus-sync.el
index 7360748..ab0723e 100644
--- a/lisp/gnus-sync.el
+++ b/lisp/gnus-sync.el
@@ -660,7 +660,7 @@ With a prefix, FORCE is set and all groups will be saved."
                    (gnus-message
                     2 "gnus-sync-save: nothing to save to the LeSync backend")
                    nil)))
-      (mapcar (apply-partially 'gnus-sync-lesync-post-save-group-entry url)
+      (mapcar (lambda (e) (gnus-sync-lesync-post-save-group-entry url e))
               sync)))
    ((stringp gnus-sync-backend)
     (gnus-message 7 "gnus-sync-save: saving to backend %s" gnus-sync-backend)

-----------------------------------------------------------------------
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-sync.el |    2 +-
 2 files changed, 2 insertions(+), 1 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.