Commit e34bc917 authored by Marc Hoersken's avatar Marc Hoersken
Browse files

runtests.pl: Fixed --verbose parameter passed to http_pipe.py

parent 2ba0f137

tests/runtests.pl

+5 −3
Original line number Diff line number Diff line
@@ -1173,6 +1173,7 @@ sub runhttpserver { 
    my $logfile;

    my $flags = "";

    my $exe = "$perl $srcdir/httpserver.pl";

    my $verbose_flag = "--verbose ";



    if($alt eq "ipv6") {

        # if IPv6, use a different setup
@@ -1187,6 +1188,7 @@ sub runhttpserver { 
        # basically the same, but another ID

        $idnum = 3;

        $exe = "python $srcdir/http_pipe.py";

        $verbose_flag .= "1 ";

    }



    $server = servername_id($proto, $ipvnum, $idnum);
@@ -1210,7 +1212,7 @@ sub runhttpserver { 


    $flags .= "--gopher " if($proto eq "gopher");

    $flags .= "--connect $HOSTIP " if($alt eq "proxy");

    $flags .= "--verbose " if($debugprotocol);

    $flags .= $verbose_flag if($debugprotocol);

    $flags .= "--pidfile \"$pidfile\" --logfile \"$logfile\" ";

    $flags .= "--id $idnum " if($idnum > 1);

    $flags .= "--ipv$ipvnum --port $port --srcdir \"$srcdir\"";
@@ -1285,7 +1287,7 @@ sub runhttp_pipeserver { 


    $logfile = server_logfilename($LOGDIR, $proto, $ipvnum, $idnum);



    $flags .= "--verbose " if($debugprotocol);

    $flags .= "--verbose 1 " if($debugprotocol);

    $flags .= "--pidfile \"$pidfile\" --logfile \"$logfile\" ";

    $flags .= "--id $idnum " if($idnum > 1);

    $flags .= "--port $port --srcdir \"$srcdir\"";