From: Michael Albinus Date: Sat, 28 Nov 2015 13:20:28 +0000 (+0100) Subject: ; Pacify byte-compiler in filenotify-tests.el X-Git-Tag: emacs-26.0.90~2918 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=9a2363ec04c24a6959902da9b8eff2f1559ab3e0;p=emacs.git ; Pacify byte-compiler in filenotify-tests.el --- 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)