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/nntp.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/nntp.el')
-rw-r--r-- | lisp/gnus/nntp.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/gnus/nntp.el b/lisp/gnus/nntp.el index e2fa1d85a36..0e5057e1a45 100644 --- a/lisp/gnus/nntp.el +++ b/lisp/gnus/nntp.el @@ -647,7 +647,7 @@ command whose response triggered the error." (nntp-close-server)) (signal 'quit nil)))) (when -timer - (nnheader-cancel-timer -timer))) + (cancel-timer -timer))) nil)) (setq nntp--report-1 nntp-report-n)) nntp-with-open-group-internal)) @@ -1280,7 +1280,7 @@ If SEND-IF-FORCE, only send authinfo to the server if the (signal 'quit nil) nil)))) (when timer - (nnheader-cancel-timer timer)) + (cancel-timer timer)) (when (and process (not (memq (process-status process) '(open run)))) (with-current-buffer pbuffer @@ -1339,7 +1339,7 @@ If SEND-IF-FORCE, only send authinfo to the server if the (defun nntp-async-stop (proc) (setq nntp-async-process-list (delq proc nntp-async-process-list)) (when (and nntp-async-timer (not nntp-async-process-list)) - (nnheader-cancel-timer nntp-async-timer) + (cancel-timer nntp-async-timer) (setq nntp-async-timer nil))) (defun nntp-after-change-function (beg end len) |