From 383c9a253b2cd030674982046e23c3670543dc68 Mon Sep 17 00:00:00 2001 From: Michael Albinus Date: Fri, 14 Sep 2018 10:03:27 +0200 Subject: [PATCH] ; Instrument autorevert-tests.el --- test/lisp/autorevert-tests.el | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) 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 -- 2.39.2