summaryrefslogtreecommitdiff
path: root/lisp/gnus/nntp.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/nntp.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/nntp.el')
-rw-r--r--lisp/gnus/nntp.el6
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)