httpd-test-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From do...@apache.org
Subject cvs commit: httpd-test/perl-framework/Apache-Test/lib/Apache TestReport.pm TestReportPerl.pm
Date Wed, 15 May 2002 02:50:37 GMT
dougm       02/05/14 19:50:37

  Modified:    perl-framework/Apache-Test/lib/Apache TestReport.pm
                        TestReportPerl.pm
  Log:
  fix email address in t/REPORT when generated by TestReportPerl
  
  Revision  Changes    Path
  1.5       +16 -3     httpd-test/perl-framework/Apache-Test/lib/Apache/TestReport.pm
  
  Index: TestReport.pm
  ===================================================================
  RCS file: /home/cvs/httpd-test/perl-framework/Apache-Test/lib/Apache/TestReport.pm,v
  retrieving revision 1.4
  retrieving revision 1.5
  diff -u -r1.4 -r1.5
  --- TestReport.pm	14 May 2002 23:44:22 -0000	1.4
  +++ TestReport.pm	15 May 2002 02:50:37 -0000	1.5
  @@ -33,6 +33,20 @@
   
   sub build_config_as_string { Apache::TestConfig::as_string() }
   
  +sub report_to { 'test-dev@httpd.apache.org' }
  +
  +sub postit_note {
  +    my $self = shift;
  +
  +    my($to, $where) = split '@', $self->report_to;
  +
  +    return <<EOF;
  +Note: Complete the rest of the details and post this bug report to
  +$to <at> $where. To subscribe to the list send an empty
  +email to $to-subscribe\@$where.
  +EOF
  +}
  +
   1;
   __DATA__
   
  @@ -44,6 +58,7 @@
       CONFIG     => __CLASS__->build_config_as_string,
       EXECUTABLE => $0,
       DATE       => scalar gmtime() . " GMT",
  +    POSTIT_NOTE => __CLASS__->postit_note,
   );
   {
       local $/ = undef;
  @@ -72,6 +87,4 @@
   
   -------------8<---------- End Bug Report --------------8<----------
   
  -Note: Complete the rest of the details and post this bug report to
  -test-dev <at> httpd.apache.org. To subscribe to the list send an empty
  -email to test-dev-subscribe@httpd.apache.org.
  +@POSTIT_NOTE@
  
  
  
  1.4       +2 -0      httpd-test/perl-framework/Apache-Test/lib/Apache/TestReportPerl.pm
  
  Index: TestReportPerl.pm
  ===================================================================
  RCS file: /home/cvs/httpd-test/perl-framework/Apache-Test/lib/Apache/TestReportPerl.pm,v
  retrieving revision 1.3
  retrieving revision 1.4
  diff -u -r1.3 -r1.4
  --- TestReportPerl.pm	14 May 2002 23:01:14 -0000	1.3
  +++ TestReportPerl.pm	15 May 2002 02:50:37 -0000	1.4
  @@ -14,5 +14,7 @@
       ModPerl::Config::as_string();
   }
   
  +sub report_to { 'modperl-dev@perl.apache.org' }
  +
   1;
   __END__
  
  
  

Mime
View raw message