From: Katsumi Yamaoka <yamaoka@jpl.org>
Date: Fri, 13 Aug 2010 10:58:21 +0000 (+0000)
Subject: Minor bug fixes for gnus-sync.el.
X-Git-Tag: emacs-pretest-24.0.90~104^2~275^2~438^2~48^2~309
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=79993b193e9766c7c8731549a68b6a27eac89f1d;p=emacs.git

Minor bug fixes for gnus-sync.el.
From Ted Zlatanov <tzz@lifelogs.com>.

* gnus-sync.el (gnus-sync-unload-hook, gnus-sync-install-hooks): Don't
read the sync on get-new-news.
---

diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog
index 9a5bd7bc144..b61eb330792 100644
--- a/lisp/gnus/ChangeLog
+++ b/lisp/gnus/ChangeLog
@@ -2,6 +2,9 @@
 
 	Minor bug fixes for gnus-sync.el.
 
+	* gnus-sync.el (gnus-sync-unload-hook, gnus-sync-install-hooks): Don't
+	read the sync on get-new-news.
+
 	* gnus-sync.el (gnus-sync-save): Define `variable' so the compiler is
 	quiet.
 
diff --git a/lisp/gnus/gnus-sync.el b/lisp/gnus/gnus-sync.el
index 153217ef38c..bd889576dc0 100644
--- a/lisp/gnus/gnus-sync.el
+++ b/lisp/gnus/gnus-sync.el
@@ -195,14 +195,14 @@ synchronized, I believe).  Also see `gnus-variable-list'."
 (defun gnus-sync-install-hooks ()
   "Install the sync hooks."
   (interactive)
-  (add-hook 'gnus-get-new-news-hook 'gnus-sync-read)
+  ;; (add-hook 'gnus-get-new-news-hook 'gnus-sync-read)
   (add-hook 'gnus-save-newsrc-hook 'gnus-sync-save)
-  (add-hook 'gnus-read-newsrc-el-hook 'gnus-sync-read))
+  (add-hook 'gnus-read-newsrc-el-hoo4a 'gnus-sync-read))
 
 (defun gnus-sync-unload-hook ()
   "Uninstall the sync hooks."
   (interactive)
-  (remove-hook 'gnus-get-new-news-hook 'gnus-sync-read)
+  ;; (remove-hook 'gnus-get-new-news-hook 'gnus-sync-read)
   (remove-hook 'gnus-save-newsrc-hook 'gnus-sync-save)
   (remove-hook 'gnus-read-newsrc-el-hook 'gnus-sync-read))