rt/lib/Makefile.PL

   1 use ExtUtils::MakeMaker;
   2 # See lib/ExtUtils/MakeMaker.pm for details of how to influence
   3 # the contents of the Makefile that is written.
   4 WriteMakefile(
   5     'NAME'      => 'RT',
   6     'VERSION_FROM' => 'RT.pm', # finds $VERSION
   7     'PREREQ_PM' => {
   8                      'DBI'                 => 1.16,
   9                      'DBIx::SearchBuilder' => '0.48',
  10                      'Date::Parse'         => 0,
  11                      'Date::Format'        => 0,
  12                      'MIME::Entity'        => 5.108,
  13                      'Mail::Mailer'        => '1.20',
  14                      'Log::Dispatch'       => 1.6,
  15                      'HTML::Entities'      => 0,
  16                      'Text::Wrapper'       => 0,
  17                      'Text::Template'      => 0,
  18                      'Getopt::Long'        => 2.24,
  19                    },
  20 );
  21
  22      {
  23                    package MY;
  24                    sub top_targets {
  25                        my($self) = @_;
  26                        my $out = "POD2TEST_EXE = pod2test\n";
  27
  28                        $out .= $self->SUPER::top_targets(@_);
  29                        # $out =~ s/^(pure_all\b.*)/$1 testifypods/m;
  30
  31                        $out .= "\n\ntestifypods : \n";
  32
  33                         my @pods = (keys %{$self->{MAN1PODS}},
  34                                      keys %{$self->{MAN3PODS}});
  35
  36                        foreach my $pod (@pods) {
  37                            (my $test = $pod) =~ s/\.(pm|pod)$//;
  38                            $test =~ s/^lib\W//;
  39                            $test =~ s/\W/-/;
  40                            $test =~ s/\//__/g;
  41                            $test = "autogen-$test.t";
  42                            $out .= "\t$self->{NOECHO}\$(POD2TEST_EXE) ".
  43                                    "$pod t/$test \n";
  44                        }
  45
  46                        return $out;
  47                    }
  48                }
  49