* lisp/net/tramp.el (tramp-accept-process-output): Use `push'.

diff --git a/lisp/net/tramp.el b/lisp/net/tramp.el
index 0e062b71551fe496f86c606b016ec007fa31b3ad..5b50d39a0d48767527b409d46682e3d70774192d 100644 (file)
--- a/lisp/net/tramp.el
+++ b/lisp/net/tramp.el
@@ -4081,7 +4081,7 @@ for process communication also."
       ;; Enable our progress reporter.
       (dolist (timer tl)
        (if (eq (timer--function timer) #'tramp-progress-reporter-update)
-            (add-to-list 'timer-list timer)))
+            (push timer timer-list)))
       ;; JUST-THIS-ONE is set due to Bug#12145.
       (tramp-message
        proc 10 "%s %s %s %s\n%s"