diff options
author | elliott_c <ocielliottc@users.noreply.github.com> | 2009-08-12 22:32:01 +0000 |
---|---|---|
committer | elliott_c <ocielliottc@users.noreply.github.com> | 2009-08-12 22:32:01 +0000 |
commit | 838c528d1f95765dc8c5eaa6715ff9dd35fe61e8 (patch) | |
tree | 7b16add2845dc89ed70862530439da3b01f45a6c /modules/WorkspaceCreator.pm | |
parent | 33642ff57c830377cfefdd1adbd70ea6ff386fd8 (diff) | |
download | MPC-838c528d1f95765dc8c5eaa6715ff9dd35fe61e8.tar.gz |
ChangeLogTag: Wed Aug 12 22:29:21 UTC 2009 Chad Elliott <elliott_c@ociweb.com>
Diffstat (limited to 'modules/WorkspaceCreator.pm')
-rw-r--r-- | modules/WorkspaceCreator.pm | 10 |
1 files changed, 8 insertions, 2 deletions
diff --git a/modules/WorkspaceCreator.pm b/modules/WorkspaceCreator.pm index 93be52a5..cf514df9 100644 --- a/modules/WorkspaceCreator.pm +++ b/modules/WorkspaceCreator.pm @@ -85,7 +85,7 @@ sub new { $self->{'scoped_basedir'} = undef; ## These are static throughout processing - $self->{'coexistence'} = $makeco; + $self->{'coexistence'} = $self->requires_make_coexistence() ? 1 : $makeco; $self->{'for_eclipse'} = $foreclipse; $self->{'generate_dot'} = $gendot; $self->{'generate_ins'} = $genins; @@ -116,7 +116,7 @@ sub new { $self->warning("The -hierarchy option is unnecessary " . "for the " . $self->{'wctype'} . " type."); } - if ($self->make_coexistence() && !$self->supports_make_coexistence()) { + if ($self->{'coexistence'} && !$self->supports_make_coexistence()) { $self->warning("Using the -make_coexistence option has " . "no effect on the " . $self->{'wctype'} . " type."); } @@ -2268,6 +2268,12 @@ sub relative { # Virtual Methods To Be Overridden # ************************************************************ +sub requires_make_coexistence { + #my $self = shift; + return 0; +} + + sub supports_make_coexistence { #my $self = shift; return 0; |