Mercurial > hg > xemacs-beta
comparison lisp/gnus/gnus-demon.el @ 163:0132846995bd r20-3b8
Import from CVS: tag r20-3b8
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:43:35 +0200 |
parents | b980b6286996 |
children | 15872534500d |
comparison
equal
deleted
inserted
replaced
162:4de2936b4e77 | 163:0132846995bd |
---|---|
238 ;; this idle-cycle. | 238 ;; this idle-cycle. |
239 (push (car handler) gnus-demon-idle-has-been-called))))))))) | 239 (push (car handler) gnus-demon-idle-has-been-called))))))))) |
240 | 240 |
241 (defun gnus-demon-add-nocem () | 241 (defun gnus-demon-add-nocem () |
242 "Add daemonic NoCeM handling to Gnus." | 242 "Add daemonic NoCeM handling to Gnus." |
243 (gnus-demon-add-handler 'gnus-demon-scan-nocem 60 t)) | 243 (gnus-demon-add-handler 'gnus-demon-scan-nocem 60 30)) |
244 | 244 |
245 (defun gnus-demon-scan-nocem () | 245 (defun gnus-demon-scan-nocem () |
246 "Scan NoCeM groups for NoCeM messages." | 246 "Scan NoCeM groups for NoCeM messages." |
247 (save-window-excursion | 247 (save-window-excursion |
248 (gnus-nocem-scan-groups))) | 248 (gnus-nocem-scan-groups))) |