Mercurial > emacs

diff lisp/gnus/gnus-sync.el @ 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
line wrap: on
line diff
--- 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))