[Emacs-diffs] master 9eaec68: ; Simplify in filenotify-tests.el

[Michael Albinus]

branch: master
commit 9eaec6859df69f0baac57f0801bfbf195ee88dc5
Author: Michael Albinus <address@hidden>
Commit: Michael Albinus <address@hidden>

    ; Simplify in filenotify-tests.el
---
 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))