From 9a2363ec04c24a6959902da9b8eff2f1559ab3e0 Mon Sep 17 00:00:00 2001 From: Michael Albinus Date: Sat, 28 Nov 2015 14:20:28 +0100 Subject: [PATCH] ; Pacify byte-compiler in filenotify-tests.el --- test/lisp/filenotify-tests.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/test/lisp/filenotify-tests.el b/test/lisp/filenotify-tests.el index c0991ae460f..d6322c22c0e 100644 --- a/test/lisp/filenotify-tests.el +++ b/test/lisp/filenotify-tests.el @@ -296,7 +296,7 @@ longer than timeout seconds for the events to be delivered." `(let* ((,outer file-notify--test-events) (events (if (consp (car ,events)) ,events (list ,events))) (max-length (apply 'max (mapcar 'length events))) - create-lockfiles result) + create-lockfiles result) ;; Flush pending events. (file-notify--wait-for-events (file-notify--test-timeout) @@ -821,7 +821,7 @@ longer than timeout seconds for the events to be delivered." ;; w32notify fires both `deleted' and `renamed' events. ((string-equal (file-notify--test-library) "w32notify") (let (r) - (dotimes (i n r) + (dotimes (_i n r) (setq r (append '(deleted renamed) r))))) (t (make-list n 'renamed))) (let ((source-file-list source-file-list) -- 2.39.2