]> git.eshelyaron.com Git - emacs.git/commitdiff
Fix problems in autorevert-tests
authorMichael Albinus <michael.albinus@gmx.de>
Mon, 20 May 2019 08:14:13 +0000 (10:14 +0200)
committerMichael Albinus <michael.albinus@gmx.de>
Mon, 20 May 2019 08:14:13 +0000 (10:14 +0200)
* test/lisp/autorevert-tests.el (auto-revert--deftest-remote):
Fix typo.
(auto-revert-test02-auto-revert-deleted-file): On emba, there are
no stopped events.

test/lisp/autorevert-tests.el

index 0cc5b9c4e9dc94fd692aa12dc7300de390eb93fc..040dbb45a91b96b0048e5300718a67a77c4af85f 100644 (file)
@@ -150,7 +150,7 @@ This expects `auto-revert--messages' to be bound by
        (tramp-dissect-file-name temporary-file-directory) nil 'keep-password)
        (condition-case err
            (funcall (ert-test-body ert-test))
-         (error (message "%s" err) (signal car err cdr err))))))
+         (error (message "%s" err) (signal (car err) (cdr err)))))))
 
 (ert-deftest auto-revert-test00-auto-revert-mode ()
   "Check autorevert for a file."
@@ -310,8 +310,9 @@ This expects `auto-revert--messages' to be bound by
             ;; notification should be disabled, falling back to
             ;; polling.
             (should (string-match "any text" (buffer-string)))
-            ;; With w32notify, the 'stopped' events are not sent.
+            ;; With w32notify, and on emba, the `stopped' events are not sent.
             (or (eq file-notify--library 'w32notify)
+                (getenv "EMACS_EMBA_CI")
                 (should-not auto-revert-notify-watch-descriptor))
 
             ;; Once the file has been recreated, the buffer shall be