1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33
|
package MakePropertyBase;
# ************************************************************
# Description : A Make property base module
# Author : Chad Elliott
# Create Date : 3/9/2010
# ************************************************************
# ************************************************************
# Pragmas
# ************************************************************
use strict;
# ************************************************************
# Subroutine Section
# ************************************************************
sub get_properties {
my $self = shift;
## Get the base class properties and add the properties that we
## support.
my $props = $self->Creator::get_properties();
## All projects that use this base class are 'make' based.
$$props{'make'} = 1;
return $props;
}
1;
|