Commit ae21fb3d authored by Michael Albinus's avatar Michael Albinus

Replace (skip-unless nil) by tag :unstable in test packages

* test/lisp/filenotify-tests.el (file-notify--deftest-remote):
Use tag :unstable if SKIP is non-nil.

* test/lisp/net/tramp-tests.el (tramp-test36-vc-registered):
Use ert-skip instead of (skip-unless nil).

* test/lisp/progmodes/python-tests.el
(python-tests--python-nav-end-of-statement--infloop): Use tag
:unstable instead of (skip-unless nil).
parent 5a9937be
Pipeline #1267 failed with stage
in 60 minutes and 1 second
...@@ -266,9 +266,8 @@ This returns only for the local case and gfilenotify; otherwise it is nil. ...@@ -266,9 +266,8 @@ This returns only for the local case and gfilenotify; otherwise it is nil.
(declare (indent 1)) (declare (indent 1))
`(ert-deftest ,(intern (concat (symbol-name test) "-remote")) () `(ert-deftest ,(intern (concat (symbol-name test) "-remote")) ()
,docstring ,docstring
:tags '(:expensive-test)
:expected-result (or ,expected :passed) :expected-result (or ,expected :passed)
(skip-unless (not ,skip)) :tags ,(if skip '(:expensive-test :unstable) '(:expensive-test))
(let* ((temporary-file-directory (let* ((temporary-file-directory
file-notify-test-remote-temporary-file-directory) file-notify-test-remote-temporary-file-directory)
(ert-test (ert-get-test ',test)) (ert-test (ert-get-test ',test))
......
...@@ -4579,7 +4579,7 @@ This tests also `make-symbolic-link', `file-truename' and `add-name-to-file'." ...@@ -4579,7 +4579,7 @@ This tests also `make-symbolic-link', `file-truename' and `add-name-to-file'."
;; skip the test then. ;; skip the test then.
(condition-case nil (condition-case nil
(vc-create-repo (car vc-handled-backends)) (vc-create-repo (car vc-handled-backends))
(error (skip-unless nil))) (error (ert-skip "`vc-create-repo' not supported")))
;; The structure of VC-FILESET is not documented. Let's ;; The structure of VC-FILESET is not documented. Let's
;; hope it won't change. ;; hope it won't change.
(condition-case nil (condition-case nil
......
...@@ -5350,7 +5350,7 @@ buffer with overlapping strings." ...@@ -5350,7 +5350,7 @@ buffer with overlapping strings."
;; The description of the problem it's trying to catch is not clear enough ;; The description of the problem it's trying to catch is not clear enough
;; to be able to see if the underlying problem is really fixed, sadly. ;; to be able to see if the underlying problem is really fixed, sadly.
;; E.g. I don't know what is meant by "overlap", really. ;; E.g. I don't know what is meant by "overlap", really.
(skip-unless nil) :tags '(:unstable)
(python-tests-with-temp-buffer "''' '\n''' ' '\n" (python-tests-with-temp-buffer "''' '\n''' ' '\n"
(syntax-propertize (point-max)) (syntax-propertize (point-max))
;; Create a situation where strings nominally overlap. This ;; Create a situation where strings nominally overlap. This
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment