[Emacs-diffs] scratch/gnus-cloud b335707 09/61: Merge branch 'master' of git.sv.gnu.org:/srv/git/emacs

[Teodor Zlatanov]

branch: scratch/gnus-cloud
commit b33570746ee79080cd963ad01e7b5ff11765f0c3
Merge: bd8a5e4 9eaec68
Author: Ted Zlatanov <address@hidden>
Commit: Ted Zlatanov <address@hidden>

    Merge branch 'master' of git.sv.gnu.org:/srv/git/emacs
---
 test/lisp/filenotify-tests.el |   39 +++++++++++++++++++--------------------
 1 file changed, 19 insertions(+), 20 deletions(-)

diff --git a/test/lisp/filenotify-tests.el b/test/lisp/filenotify-tests.el
index 30e7450..0e6e58e 100644
--- a/test/lisp/filenotify-tests.el
+++ b/test/lisp/filenotify-tests.el
@@ -1040,26 +1040,25 @@ the file watch."
           ;; Run the test.
           (file-notify--test-with-events
               ;; There could be one or two `changed' events.
-              (append
-               (list
-                (append
-                 '(:random)
-                 ;; Directory monitor and file monitor.
-                 (make-list (/ n 2) 'changed)
-                 (make-list (/ n 2) 'changed)
-                 ;; Just the directory monitor.
-                 (make-list (/ n 2) 'created)
-                 (make-list (/ n 2) 'changed))
-                (append
-                 '(:random)
-                 ;; Directory monitor and file monitor.
-                 (make-list (/ n 2) 'changed)
-                 (make-list (/ n 2) 'changed)
-                 (make-list (/ n 2) 'changed)
-                 (make-list (/ n 2) 'changed)
-                 ;; Just the directory monitor.
-                 (make-list (/ n 2) 'created)
-                 (make-list (/ n 2) 'changed))))
+              (list
+               (append
+                '(:random)
+                ;; Directory monitor and file monitor.
+                (make-list (/ n 2) 'changed)
+                (make-list (/ n 2) 'changed)
+                ;; Just the directory monitor.
+                (make-list (/ n 2) 'created)
+                (make-list (/ n 2) 'changed))
+               (append
+                '(:random)
+                ;; Directory monitor and file monitor.
+                (make-list (/ n 2) 'changed)
+                (make-list (/ n 2) 'changed)
+                (make-list (/ n 2) 'changed)
+                (make-list (/ n 2) 'changed)
+                ;; Just the directory monitor.
+                (make-list (/ n 2) 'created)
+                (make-list (/ n 2) 'changed)))
             (dotimes (i n)
               (read-event nil nil file-notify--test-read-event-timeout)
               (if (zerop (mod i 2))