From: Michael Albinus <michael.albinus@gmx.de>
Date: Fri, 14 Sep 2018 08:03:27 +0000 (+0200)
Subject: ; Instrument autorevert-tests.el
X-Git-Tag: emacs-27.0.90~4420
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=383c9a253b2cd030674982046e23c3670543dc68;p=emacs.git

; Instrument autorevert-tests.el
---

diff --git a/test/lisp/autorevert-tests.el b/test/lisp/autorevert-tests.el
index b378c9b8b08..9710600f169 100644
--- a/test/lisp/autorevert-tests.el
+++ b/test/lisp/autorevert-tests.el
@@ -181,7 +181,10 @@ This expects `auto-revert--messages' to be bound by
             ;; modifying `before-revert-hook'.
             (add-hook
              'before-revert-hook
-             (lambda () (delete-file buffer-file-name))
+             (lambda ()
+               ;; Temporarily.
+               (message "%s deleted" buffer-file-name)
+               (delete-file buffer-file-name))
              nil t)
 
             (ert-with-message-capture auto-revert--messages