X-Git-Url: http://sjero.net/git/?p=wget;a=blobdiff_plain;f=tests%2FTest-ftp-bad-list.px;h=8584d0a6c564a1a59d81c6ceda2aa2c9225e1020;hp=11a973fd58f60dc01404cb97bc335876f6e1e65d;hb=HEAD;hpb=aab7dadc9a4f55d3a7921a2844ba1bbc18f7fc10 diff --git a/tests/Test-ftp-bad-list.px b/tests/Test-ftp-bad-list.px index 11a973fd..8584d0a6 100755 --- a/tests/Test-ftp-bad-list.px +++ b/tests/Test-ftp-bad-list.px @@ -1,4 +1,4 @@ -#!/usr/bin/perl +#!/usr/bin/env perl use strict; use warnings; @@ -29,7 +29,7 @@ my %urls = ( }, ); -my $cmdline = $WgetTest::WGETPATH . " -d -nH -Nc -r ftp://localhost:{{port}}/"; +my $cmdline = $WgetTest::WGETPATH . " -nH -Nc -r ftp://localhost:{{port}}/"; my $expected_error_code = 0; @@ -57,9 +57,9 @@ my %preexisting_files = ( ############################################################################### my $the_test = FTPTest->new (name => "Test-ftp-bad-list", - input => \%urls, - cmdline => $cmdline, - errcode => $expected_error_code, + input => \%urls, + cmdline => $cmdline, + errcode => $expected_error_code, output => \%expected_downloaded_files, existing => \%preexisting_files, server_behavior => {bad_list => 1});