modules/AutomakeProjectCreator.pm

   1 package AutomakeProjectCreator;
   2
   3 # ************************************************************
   4 # Description   : A Automake Project Creator
   5 # Author        : J.T. Conklin & Chad Elliott
   6 # Create Date   : 2/26/2003
   7 # ************************************************************
   8
   9 # ************************************************************
  10 # Pragmas
  11 # ************************************************************
  12
  13 use strict;
  14
  15 use MakeProjectBase;
  16 use ProjectCreator;
  17
  18 use vars qw(@ISA);
  19 @ISA = qw(MakeProjectBase ProjectCreator);
  20
  21 # ************************************************************
  22 # Subroutine Section
  23 # ************************************************************
  24
  25 sub escape_spaces {
  26   #my $self = shift;
  27   return 1;
  28 }
  29
  30
  31 sub fill_value {
  32   my($self, $name) = @_;
  33   my $value;
  34
  35   if ($name eq 'am_version') {
  36     $value = $self->get_assignment('version');
  37     $value .= ':0' if (defined $value && ($value =~ tr/./:/) < 2);
  38   }
  39
  40   return $value;
  41 }
  42
  43
  44 sub project_file_extension {
  45   #my $self = shift;
  46   return '.am';
  47 }
  48
  49
  50 sub get_dll_exe_template_input_file {
  51   #my $self = shift;
  52   return 'automakeexe';
  53 }
  54
  55
  56 sub get_dll_template_input_file {
  57   #my $self = shift;
  58   return 'automakedll';
  59 }
  60
  61
  62 1;