From: Michael Albinus Date: Mon, 7 Jan 2019 13:09:02 +0000 (+0100) Subject: Remove instrumentation X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=56a96db98dc72395248198974e1947b4c31f8070;p=emacs.git Remove instrumentation * lisp/filenotify.el (file-notify-handle-event): * test/lisp/filenotify-tests.el (file-notify--test-event-handler): Remove instrumentation. --- diff --git a/lisp/filenotify.el b/lisp/filenotify.el index ef3be8a4a9b..6a3f0b0f47d 100644 --- a/lisp/filenotify.el +++ b/lisp/filenotify.el @@ -90,7 +90,7 @@ If EVENT is a filewatch event, call its callback. It has the format Otherwise, signal a `file-notify-error'." (interactive "e") - (message "file-notify-handle-event %S" event) + ;;(message "file-notify-handle-event %S" event) (if (and (consp event) (eq (car event) 'file-notify) (>= (length event) 3)) diff --git a/test/lisp/filenotify-tests.el b/test/lisp/filenotify-tests.el index 2aa0b6a0e8b..f2da8f3ed52 100644 --- a/test/lisp/filenotify-tests.el +++ b/test/lisp/filenotify-tests.el @@ -516,8 +516,8 @@ and the event to `file-notify--test-events'." (unless (string-match (regexp-quote ".#") (file-notify--event-file-name file-notify--test-event)) - (message "file-notify--test-event-handler result: %s event: %S" - (null (ert-test-failed-p result)) file-notify--test-event) + ;;(message "file-notify--test-event-handler result: %s event: %S" + ;;(null (ert-test-failed-p result)) file-notify--test-event) (setq file-notify--test-events (append file-notify--test-events `(,file-notify--test-event)) file-notify--test-results