From: Michael Albinus <michael.albinus@gmx.de>
Date: Thu, 28 Mar 2019 10:43:09 +0000 (+0100)
Subject: * lisp/net/tramp.el (tramp-accept-process-output): Use `push'.
X-Git-Tag: emacs-27.0.90~3306
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=2654c0b61b2cb8ee14d84f042ae6fc605adf64a8;p=emacs.git

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

diff --git a/lisp/net/tramp.el b/lisp/net/tramp.el
index 0e062b71551..5b50d39a0d4 100644
--- 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"