diff options
| author | elliott_c <ocielliottc@users.noreply.github.com> | 2006-02-22 20:05:55 +0000 |
|---|---|---|
| committer | elliott_c <ocielliottc@users.noreply.github.com> | 2006-02-22 20:05:55 +0000 |
| commit | 0a39d41a42ecf2dbf17ab337e495220871d8e29a (patch) | |
| tree | c6c3053f01627fd6d6356771bfdba7d883fd5cce /modules/VC6WorkspaceCreator.pm | |
| parent | fef48d8b7c84ae1052076f4171dbea56ce6cf95e (diff) | |
| download | MPC-0a39d41a42ecf2dbf17ab337e495220871d8e29a.tar.gz | |
ChangeLogTag: Wed Feb 22 20:06:00 UTC 2006 Chad Elliott <elliott_c@ociweb.com>
Diffstat (limited to 'modules/VC6WorkspaceCreator.pm')
| -rw-r--r-- | modules/VC6WorkspaceCreator.pm | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/modules/VC6WorkspaceCreator.pm b/modules/VC6WorkspaceCreator.pm index c4c63966..7e0952e3 100644 --- a/modules/VC6WorkspaceCreator.pm +++ b/modules/VC6WorkspaceCreator.pm @@ -63,11 +63,12 @@ sub pre_workspace { sub write_comps { my($self) = shift; my($fh) = shift; + my($gen) = shift; my($projects) = $self->get_projects(); my($pjs) = $self->get_project_info(); my($crlf) = $self->crlf(); - foreach my $project (@$projects) { + foreach my $project (sort { $gen->file_sorter($a, $b) } @$projects) { my($name) = $$pjs{$project}->[0]; my($deps) = $self->get_validated_ordering($project); |