diff options
author | Lars Ingebrigtsen <larsi@gnus.org> | 2019-05-20 13:47:16 +0200 |
---|---|---|
committer | Lars Ingebrigtsen <larsi@gnus.org> | 2019-05-20 13:47:53 +0200 |
commit | bfcff8f88a472bd1a64922da094cd007d3b7a70a (patch) | |
tree | bca1e5a94394de38a784f2104c0b9478d6a8610f /lisp/gnus/mail-source.el | |
parent | b552fc05c231ca6800330a318d3a74ddd0f5a13c (diff) | |
download | emacs-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.el | 5 |
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 |