Fix dnd-tests-open-remote-url on EMBA

* test/lisp/dnd-tests.el (dnd-tests-open-remote-url): Check for
ftp client.
This commit is contained in:
Michael Albinus 2022-06-22 17:47:39 +02:00
parent 47374d4416
commit ec1fffdeca

View file

@ -375,6 +375,8 @@ This function only tries to handle strings."
;; Expensive test to make sure opening an FTP URL during
;; drag-and-drop works.
:tags '(:expensive-test)
;; Don't run if there is no ftp client.
(skip-unless (executable-find "ftp"))
;; Don't run this test if the FTP server isn't reachable.
(skip-unless (and (fboundp 'network-lookup-address-info)
(network-lookup-address-info "ftp.gnu.org")))