Args in sbtest
This commit is contained in:
parent
8582c8f7c0
commit
d502fd4929
|
@ -260,6 +260,12 @@ my $tests = {
|
|||
|
||||
my $times = {};
|
||||
|
||||
if(@ARGV) {
|
||||
foreach my $t ( keys %$tests ) {
|
||||
delete $tests->{$t} unless(grep /^$t$/, @ARGV);
|
||||
}
|
||||
}
|
||||
|
||||
foreach my $name ( keys %$tests ) {
|
||||
my $opts = $tests->{$name}->{globalStorageOptions};
|
||||
if ( my $cmd = delete $tests->{$name}->{cmd} ) {
|
||||
|
|
Loading…
Reference in New Issue