summaryrefslogtreecommitdiff
path: root/modules/VC7ProjectCreator.pm
diff options
context:
space:
mode:
authormichel_j <michel_j@a3e5c962-4219-0410-a828-e124f845ac39>2003-08-23 01:29:48 +0000
committermichel_j <michel_j@a3e5c962-4219-0410-a828-e124f845ac39>2003-08-23 01:29:48 +0000
commit9206108142b050b6d69cf5d469ad237d531d9f20 (patch)
tree47be81f38e414e962a6a69faa80cbaf5cdff0b11 /modules/VC7ProjectCreator.pm
parentfda133cc50cdb71362305d50c0560170f65ac41e (diff)
downloadMPC-9206108142b050b6d69cf5d469ad237d531d9f20.tar.gz
Fri Aug 22 20:10:41 UTC 2003 Justin Michel <michel_j@ociweb.com>
Diffstat (limited to 'modules/VC7ProjectCreator.pm')
-rw-r--r--modules/VC7ProjectCreator.pm34
1 files changed, 11 insertions, 23 deletions
diff --git a/modules/VC7ProjectCreator.pm b/modules/VC7ProjectCreator.pm
index bf182002..6be9b130 100644
--- a/modules/VC7ProjectCreator.pm
+++ b/modules/VC7ProjectCreator.pm
@@ -29,32 +29,20 @@ sub file_sorter {
return lc($left) cmp lc($right);
}
-
-sub specific_lookup {
+sub translate_value {
my($self) = shift;
- my($tag) = shift;
- my($val) = undef;
-
- if (defined $self->{'guid_names'} &&
- defined $self->{'guid_names'}->{$tag}) {
- $val = $self->{'guid_names'}->{$tag};
- }
-
- return $val;
-}
-
-
-sub save_project_value {
- my($self) = shift;
- my($name) = shift;
- my($value) = shift;
-
- if ($name eq 'guid') {
- if (!defined $self->{'guid_names'}) {
- $self->{'guid_names'} = {};
+ my($key) = shift;
+ my($val) = shift;
+
+ if ($key eq 'after' && $val ne '') {
+ my($arr) = $self->create_array($val);
+ $val = '';
+ foreach my $entry (@$arr) {
+ $val .= '"' . $entry . '" ';
}
- $self->{'guid_names'}->{$self->project_file_name()} = $value;
+ $val =~ s/\s+$//;
}
+ return $val;
}