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

* test/lisp/dnd-tests.el (dnd-tests-open-remote-url): Check for
ftp client.

diff --git a/test/lisp/dnd-tests.el b/test/lisp/dnd-tests.el
index 3ee92286f967fde0e792c62db7dec146e153d0ab..aae9c80273f11b17cf4d9b5f0e13fff776e99219 100644 (file)
--- a/test/lisp/dnd-tests.el
+++ b/test/lisp/dnd-tests.el
@@ -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")))