aboutsummaryrefslogtreecommitdiffstats
path: root/tools
diff options
context:
space:
mode:
authorAnton Vorontsov <cbouatmailru@gmail.com>2012-01-10 11:55:11 -0500
committerAnton Vorontsov <cbouatmailru@gmail.com>2012-01-10 11:55:11 -0500
commit913272b3864d6da89c70d9fc2c30ccb57794b369 (patch)
tree4fb0a8ab1b53623d2a8ea200b80a3ace2d271471 /tools
parent6cfc2a23540667cff6da6e41d1f1167a9a45aa9a (diff)
parent629bcb4b72d49b3631ae3dd0fe1d345820fadfcc (diff)
Merge git://git.infradead.org/users/cbou/battery-urgent
Diffstat (limited to 'tools')
-rwxr-xr-xtools/testing/ktest/ktest.pl16
1 files changed, 16 insertions, 0 deletions
diff --git a/tools/testing/ktest/ktest.pl b/tools/testing/ktest/ktest.pl
index 30e2befd6f2a..8b4c2535b266 100755
--- a/tools/testing/ktest/ktest.pl
+++ b/tools/testing/ktest/ktest.pl
@@ -747,6 +747,18 @@ sub __eval_option {
747 # Add space to evaluate the character before $ 747 # Add space to evaluate the character before $
748 $option = " $option"; 748 $option = " $option";
749 my $retval = ""; 749 my $retval = "";
750 my $repeated = 0;
751 my $parent = 0;
752
753 foreach my $test (keys %repeat_tests) {
754 if ($i >= $test &&
755 $i < $test + $repeat_tests{$test}) {
756
757 $repeated = 1;
758 $parent = $test;
759 last;
760 }
761 }
750 762
751 while ($option =~ /(.*?[^\\])\$\{(.*?)\}(.*)/) { 763 while ($option =~ /(.*?[^\\])\$\{(.*?)\}(.*)/) {
752 my $start = $1; 764 my $start = $1;
@@ -760,10 +772,14 @@ sub __eval_option {
760 # otherwise see if the default OPT (without [$i]) exists. 772 # otherwise see if the default OPT (without [$i]) exists.
761 773
762 my $o = "$var\[$i\]"; 774 my $o = "$var\[$i\]";
775 my $parento = "$var\[$parent\]";
763 776
764 if (defined($opt{$o})) { 777 if (defined($opt{$o})) {
765 $o = $opt{$o}; 778 $o = $opt{$o};
766 $retval = "$retval$o"; 779 $retval = "$retval$o";
780 } elsif ($repeated && defined($opt{$parento})) {
781 $o = $opt{$parento};
782 $retval = "$retval$o";
767 } elsif (defined($opt{$var})) { 783 } elsif (defined($opt{$var})) {
768 $o = $opt{$var}; 784 $o = $opt{$var};
769 $retval = "$retval$o"; 785 $retval = "$retval$o";