Mercurial > emacs

changeset 109768:9c65ce5bc0db

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
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.
author Katsumi Yamaoka <yamaoka@jpl.org>
date Fri, 13 Aug 2010 10:58:21 +0000
parents f7cd57edb2ca
children fe81389a263d
files lisp/gnus/ChangeLog lisp/gnus/gnus-sync.el
diffstat 2 files changed, 6 insertions(+), 3 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/gnus/ChangeLog	Fri Aug 13 10:54:05 2010 +0000
+++ b/lisp/gnus/ChangeLog	Fri Aug 13 10:58:21 2010 +0000
@@ -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.
 
--- a/lisp/gnus/gnus-sync.el	Fri Aug 13 10:54:05 2010 +0000
+++ b/lisp/gnus/gnus-sync.el	Fri Aug 13 10:58:21 2010 +0000
@@ -195,14 +195,14 @@
 (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))