diff options
| author | elliott_c <ocielliottc@users.noreply.github.com> | 2006-02-16 19:56:16 +0000 |
|---|---|---|
| committer | elliott_c <ocielliottc@users.noreply.github.com> | 2006-02-16 19:56:16 +0000 |
| commit | bf84f8b8982c942d3e357535f05c0c78aa3a3ff9 (patch) | |
| tree | 4ef8c167caf391ac41dd8bddda88f564f945678d /modules/HTMLWorkspaceCreator.pm | |
| parent | 555e83360bb0f0292652f66e8d4c2acd07662fbb (diff) | |
| download | MPC-bf84f8b8982c942d3e357535f05c0c78aa3a3ff9.tar.gz | |
ChangeLogTag: Thu Feb 16 19:53:13 UTC 2006 Chad Elliott <elliott_c@ociweb.com>
Diffstat (limited to 'modules/HTMLWorkspaceCreator.pm')
| -rw-r--r-- | modules/HTMLWorkspaceCreator.pm | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/modules/HTMLWorkspaceCreator.pm b/modules/HTMLWorkspaceCreator.pm index 5e72bbea..e213a747 100644 --- a/modules/HTMLWorkspaceCreator.pm +++ b/modules/HTMLWorkspaceCreator.pm @@ -55,7 +55,6 @@ sub write_comps { my($self) = shift; my($fh) = shift; my($creator) = shift; - my($projects) = $self->get_projects(); my($project_info) = $self->get_project_info(); my($crlf) = $self->crlf(); @@ -63,11 +62,12 @@ sub write_comps { "summary=\"MPC Projects\">$crlf" . "<col style=\"background-color: darkcyan;\">$crlf" . "<thead>$crlf" . - "<tr><td>Projects</td></tr>$crlf" . + "<tr><td>Projects In Build Order</td></tr>$crlf" . "</thead>$crlf" . "<tbody>$crlf"; - foreach my $project (sort { $creator->file_sorter($a, $b) } @$projects) { + ## Sort the projects in build order instead of alphabetical order + foreach my $project ($self->sort_dependencies($self->get_projects(), 0)) { my($name) = $$project_info{$project}->[0]; print $fh "<tr><td>" . "<a href='$project'>$name</a>" . |