diff options
author | elliott_c <ocielliottc@users.noreply.github.com> | 2003-09-08 12:04:20 +0000 |
---|---|---|
committer | elliott_c <ocielliottc@users.noreply.github.com> | 2003-09-08 12:04:20 +0000 |
commit | 26d64d5540cb374fb0dd6de223e464279128f6bc (patch) | |
tree | 0be3a567ea5c869463615992ef039a5ee392a95e | |
parent | 9e58586cb811c28ee4f0aa3f5a6724de11c95597 (diff) | |
download | MPC-26d64d5540cb374fb0dd6de223e464279128f6bc.tar.gz |
ChangeLogTag: Mon Sep 8 07:04:06 2003 Chad Elliott <elliott_c@ociweb.com>
-rw-r--r-- | modules/ProjectCreator.pm | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/modules/ProjectCreator.pm b/modules/ProjectCreator.pm index b503c659..1254efda 100644 --- a/modules/ProjectCreator.pm +++ b/modules/ProjectCreator.pm @@ -196,6 +196,23 @@ sub read_global_configuration { } +sub process_assignment { + my($self) = shift; + my($name) = shift; + my($value) = shift; + my($assign) = shift; + + ## Support the '*' mechanism as in the project name, to allow + ## the user to correctly depend on another project within the same + ## directory. + if ($name eq 'after' && $value =~ /\*/) { + my($def) = $self->get_default_project_name(); + $value = $self->fill_type_name($value, $def); + } + $self->SUPER::process_assignment($name, $value, $assign); +} + + sub parse_line { my($self) = shift; my($ih) = shift; |