procyberian/emacs
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Improve backward compatibility of tramp-tests.el

Browse source 
* test/lisp/net/tramp-tests.el (tramp--test-emacs26-p): Fix docstring.
(tramp-test41-unload): Skip unless Emacs >= 26.
This commit is contained in:
Michael Albinus 2017-10-23 12:46:32 +02:00
parent 46cdc01daa
commit 8093e82e42
1 changed files with 4 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
test/lisp/net/tramp-tests.el
View file

@ -3678,7 +3678,7 @@ This tests also `make-symbolic-link', `file-truename' and `add-name-to-file'."
(defun tramp--test-emacs26-p () (defun tramp--test-emacs26-p ()
"Check for Emacs version >= 26.1. "Check for Emacs version >= 26.1.
Some semantics has been changed for there, w/o new functions or Some semantics has been changed for there, w/o new functions or
variables, so we check function Emacs version directly." variables, so we check the Emacs version directly."
(>= emacs-major-version 26)) (>= emacs-major-version 26))
(defun tramp--test-adb-p () (defun tramp--test-adb-p ()
@ -4338,6 +4338,9 @@ process sentinels. They shall not disturb each other."
Since it unloads Tramp, it shall be the last test to run." Since it unloads Tramp, it shall be the last test to run."
:tags '(:expensive-test) :tags '(:expensive-test)
(skip-unless noninteractive) (skip-unless noninteractive)
;; The autoloaded Tramp objects are different since Emacs 26.1. We
;; cannot test older Emacsen, therefore.
(skip-unless (tramp--test-emacs26-p))
(when (featurep 'tramp) (when (featurep 'tramp)
(unload-feature 'tramp 'force) (unload-feature 'tramp 'force)