diff options
author | elliott_c <ocielliottc@users.noreply.github.com> | 2006-12-13 17:05:45 +0000 |
---|---|---|
committer | elliott_c <ocielliottc@users.noreply.github.com> | 2006-12-13 17:05:45 +0000 |
commit | 6621ecfae7fdf5feb70fc554ac74a26147fcd327 (patch) | |
tree | fc152b18171531cd9bbdcb1f4f2011c057f41b47 /modules/Options.pm | |
parent | b1e51312fdfd1fa89084bf75033e3bbcc492ff71 (diff) | |
download | MPC-6621ecfae7fdf5feb70fc554ac74a26147fcd327.tar.gz |
ChangeLogTag: Wed Dec 13 17:05:29 UTC 2006 Chad Elliott <elliott_c@ociweb.com>
Diffstat (limited to 'modules/Options.pm')
-rw-r--r-- | modules/Options.pm | 10 |
1 files changed, 9 insertions, 1 deletions
diff --git a/modules/Options.pm b/modules/Options.pm index dedd8efa..17983cbe 100644 --- a/modules/Options.pm +++ b/modules/Options.pm @@ -474,7 +474,15 @@ sub options { my($pc) = new ProjectCreator(); if ($pc->parse_assignment($value, \@values)) { $addtemp{$values[1]} = [] if (!defined $addtemp{$values[1]}); - push(@{$addtemp{$values[1]}}, [$values[0], $values[2]]); + ## The extra parameter (3rd) indicates that this value was + ## specified on the command line + push(@{$addtemp{$values[1]}}, [$values[0], $values[2], 1]); + + my($keywords) = ProjectCreator::getKeywords(); + if (defined $$keywords{$values[1]}) { + $self->warning($values[1] . ' is a project keyword; you ' . + 'should use -value_project instead.'); + } } else { $self->optionError('Invalid argument to -value_template'); |