Display components in alphabetical order.
git-svn-id: svn://10.0.0.236/trunk@34803 18797224-902f-48f8-a5cc-f745e15eee43
This commit is contained in:
@@ -74,7 +74,7 @@ my $colbut1 = $cols - 1;
|
||||
|
||||
print "</tr>";
|
||||
|
||||
SendSQL("select value, initialowner, initialqacontact, description from components where program = " . SqlQuote($product));
|
||||
SendSQL("select value, initialowner, initialqacontact, description from components where program = " . SqlQuote($product) . " order by value");
|
||||
|
||||
while (MoreSQLData()) {
|
||||
my @row = FetchSQLData();
|
||||
|
||||
@@ -222,7 +222,7 @@ sub GenerateVersionTable {
|
||||
push @{$::versions{$p1}}, $v;
|
||||
$varray{$v} = 1;
|
||||
}
|
||||
SendSQL("select value, program from components");
|
||||
SendSQL("select value, program from components order by value");
|
||||
while (@line = FetchSQLData()) {
|
||||
my ($c,$p) = (@line);
|
||||
if (!defined $::components{$p}) {
|
||||
|
||||
Reference in New Issue
Block a user