From 6504f642318f18cb06f8b0753fb7b341782965e8 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Franti=C5=A1ek=20Dvo=C5=99=C3=A1k?= Date: Sun, 21 Apr 2013 03:01:57 +0200 Subject: [PATCH] Sorting platforms in report, update scenarios ids for glue. --- matrixgen.pl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/matrixgen.pl b/matrixgen.pl index 2504ca0..f19e609 100755 --- a/matrixgen.pl +++ b/matrixgen.pl @@ -177,7 +177,7 @@ foreach my $c (sort keys %components) { for my $s ('install', 'minor-upgrade', 'major-upgrade', 'double-upgrade') { if (exists $list{$s}) { - for my $p (keys %{$list{$s}{$c}}) { + for my $p (sort keys %{$list{$s}{$c}}) { $item = $list{$s}{$c}{$p}; if (exists $item->{result} and $item->{result} eq "0") { $cmd = "cat $item->{dir}/report.twiki >> /tmp/report-$c-$s.twiki.part"; @@ -186,7 +186,7 @@ foreach my $c (sort keys %components) { } } } - `cat /tmp/report-$c-install.twiki.part /tmp/report-$c-upgrade.twiki.part /tmp/report-$c-minor-upgrade.twiki.part > /tmp/report-$c.twiki 2>/dev/null`; + `cat /tmp/report-$c-install.twiki.part /tmp/report-$c-minor-upgrade.twiki.part /tmp/report-$c-major-upgrade.twiki.part /tmp/report-$c-double-upgrade.twiki.part > /tmp/report-$c.twiki 2>/dev/null`; `rm -f /tmp/report-$c-*.twiki.part`; } -- 1.8.2.3