Commit e0e67812 authored by Daniel Stenberg's avatar Daniel Stenberg
Browse files

now sorts the test cases when "all" is used

parent eb72e001

tests/runtests.pl

+6 −2
Original line number Diff line number Diff line
@@ -398,10 +398,14 @@ if ( $TESTCASES eq "all") { 
    my @cmds = grep { /^command/ && -f "$TESTDIR/$_" } readdir(DIR);

    closedir DIR;



    $TESTCASES="";

    for(@cmds) {

    $TESTCASES=""; # start with no test cases



    # cut off everything but the digits 

    for(@cmds) {

        $_ =~ s/[a-z\/\.]*//g;

    }

    # the the numbers from low to high

    for(sort { $a <=> $b } @cmds) {

        $TESTCASES .= " $_";

    }

}