From 79993b193e9766c7c8731549a68b6a27eac89f1d Mon Sep 17 00:00:00 2001 From: Katsumi Yamaoka Date: Fri, 13 Aug 2010 10:58:21 +0000 Subject: [PATCH] Minor bug fixes for gnus-sync.el. From Ted Zlatanov . * gnus-sync.el (gnus-sync-unload-hook, gnus-sync-install-hooks): Don't read the sync on get-new-news. --- lisp/gnus/ChangeLog | 3 +++ lisp/gnus/gnus-sync.el | 6 +++--- 2 files changed, 6 insertions(+), 3 deletions(-) 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)) -- 2.39.2