X-Git-Url: http://sjero.net/git/?p=wget;a=blobdiff_plain;f=tests%2FTest-O-nonexisting.px;h=8fde7c8fa59f481fec0369f0aaea482751b12dba;hp=b341b7f16373958e7b8ca2b9488aee7ced921ce9;hb=320cfdcb658e8d6556ae9dfd902c2db1db866a6b;hpb=92b2323253a9cc0e5e3491fe1895ef710315aed7 diff --git a/tests/Test-O-nonexisting.px b/tests/Test-O-nonexisting.px index b341b7f1..8fde7c8f 100755 --- a/tests/Test-O-nonexisting.px +++ b/tests/Test-O-nonexisting.px @@ -1,6 +1,7 @@ -#!/usr/bin/perl -w +#!/usr/bin/env perl use strict; +use warnings; use HTTPTest; @@ -23,9 +24,9 @@ my %urls = ( }, ); -my $cmdline = "wget --quiet -O out http://localhost:8080/nonexistent"; +my $cmdline = $WgetTest::WGETPATH . " --quiet -O out http://localhost:{{port}}/nonexistent"; -my $expected_error_code = 256; +my $expected_error_code = 8; my %expected_downloaded_files = ( 'out' => { @@ -36,11 +37,11 @@ my %expected_downloaded_files = ( ############################################################################### my $the_test = HTTPTest->new (name => "Test-O-nonexisting", - input => \%urls, - cmdline => $cmdline, - errcode => $expected_error_code, + input => \%urls, + cmdline => $cmdline, + errcode => $expected_error_code, output => \%expected_downloaded_files); -$the_test->run(); +exit $the_test->run(); # vim: et ts=4 sw=4