summaryrefslogtreecommitdiff
path: root/lisp/gnus/mail-source.el
diff options
context:
space:
mode:
authorLars Ingebrigtsen <larsi@gnus.org>2019-05-20 13:47:16 +0200
committerLars Ingebrigtsen <larsi@gnus.org>2019-05-20 13:47:53 +0200
commitbfcff8f88a472bd1a64922da094cd007d3b7a70a (patch)
treebca1e5a94394de38a784f2104c0b9478d6a8610f /lisp/gnus/mail-source.el
parentb552fc05c231ca6800330a318d3a74ddd0f5a13c (diff)
downloademacs-bfcff8f88a472bd1a64922da094cd007d3b7a70a.tar.gz
Mark nnheader-cancel-timer as obsolete and adjust callers
* lisp/gnus/nnheader.el (nnheader-cancel-timer) (nnheader-cancel-function-timers): Mark as obsolete. * lisp/gnus/nntp.el (nntp-with-open-group-function) (nntp-async-stop): Adjust caller. * lisp/gnus/gnus-art.el (gnus-stop-date-timer): Ditto. * lisp/gnus/gnus-async.el (gnus-async-prefetch-next): Ditto. * lisp/gnus/gnus-demon.el (gnus-demon-run-callback) (gnus-demon-cancel): Ditto. * lisp/gnus/mail-source.el (mail-source-report-new-mail): Ditto. * lisp/gnus/nnmaildir.el (nnmaildir-request-accept-article): Ditto.
Diffstat (limited to 'lisp/gnus/mail-source.el')
-rw-r--r--lisp/gnus/mail-source.el5
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/gnus/mail-source.el b/lisp/gnus/mail-source.el
index 7514e64e7c2..9d70bd5afa9 100644
--- a/lisp/gnus/mail-source.el
+++ b/lisp/gnus/mail-source.el
@@ -31,7 +31,6 @@
(autoload 'auth-source-search "auth-source")
(autoload 'pop3-movemail "pop3")
(autoload 'pop3-get-message-count "pop3")
-(autoload 'nnheader-cancel-timer "nnheader")
(require 'mm-util)
(require 'message) ;; for `message-directory'
@@ -989,9 +988,9 @@ This only works when `display-time' is enabled."
(> (prefix-numeric-value arg) 0))))
(setq mail-source-report-new-mail on)
(and mail-source-report-new-mail-timer
- (nnheader-cancel-timer mail-source-report-new-mail-timer))
+ (cancel-timer mail-source-report-new-mail-timer))
(and mail-source-report-new-mail-idle-timer
- (nnheader-cancel-timer mail-source-report-new-mail-idle-timer))
+ (cancel-timer mail-source-report-new-mail-idle-timer))
(setq mail-source-report-new-mail-timer nil)
(setq mail-source-report-new-mail-idle-timer nil)
(if on