You are viewing a plain text version of this content. The canonical link for it is here.
Posted to test-cvs@httpd.apache.org by st...@apache.org on 2003/04/29 08:37:48 UTC

cvs commit: httpd-test/perl-framework/Apache-Test/t TEST.PL

stas        2003/04/28 23:37:48

  Modified:    perl-framework/Apache-Test Makefile.PL Changes
               perl-framework/Apache-Test/t TEST.PL
  Log:
  a few fixes in Makefile.PL and t/TEST.PL to work with perl-5.005_03
  
  Revision  Changes    Path
  1.8       +4 -2      httpd-test/perl-framework/Apache-Test/Makefile.PL
  
  Index: Makefile.PL
  ===================================================================
  RCS file: /home/cvs/httpd-test/perl-framework/Apache-Test/Makefile.PL,v
  retrieving revision 1.7
  retrieving revision 1.8
  diff -u -r1.7 -r1.8
  --- Makefile.PL	28 Apr 2003 04:23:38 -0000	1.7
  +++ Makefile.PL	29 Apr 2003 06:37:47 -0000	1.8
  @@ -1,6 +1,7 @@
   use 5.005;
   
   use ExtUtils::MakeMaker;
  +use Symbol;
   
   use lib qw(lib);
   
  @@ -31,8 +32,9 @@
   sub set_version {
       $VERSION = $Apache::Test::VERSION;
   
  -    open my $fh, 'Changes';
  -    while(<$fh>) {
  +    my $fh = Symbol::gensym();
  +    open $fh, 'Changes' or die "Can't open Changes: $!";
  +    while (<$fh>) {
   	if(/^=item.*-dev/) {
   	    $VERSION .= '-dev';
   	    last;
  
  
  
  1.12      +2 -0      httpd-test/perl-framework/Apache-Test/Changes
  
  Index: Changes
  ===================================================================
  RCS file: /home/cvs/httpd-test/perl-framework/Apache-Test/Changes,v
  retrieving revision 1.11
  retrieving revision 1.12
  diff -u -r1.11 -r1.12
  --- Changes	29 Apr 2003 03:44:23 -0000	1.11
  +++ Changes	29 Apr 2003 06:37:47 -0000	1.12
  @@ -8,6 +8,8 @@
   
   =item 1.01-dev
   
  +a few fixes in Makefile.PL and t/TEST.PL to work with perl-5.005_03 [Stas]
  +
   perlpods are found either in the 'pods/' or 'pod/' subdirs [Randal
   L. Schwartz <me...@stonehenge.com>]
   
  
  
  
  1.4       +2 -1      httpd-test/perl-framework/Apache-Test/t/TEST.PL
  
  Index: TEST.PL
  ===================================================================
  RCS file: /home/cvs/httpd-test/perl-framework/Apache-Test/t/TEST.PL,v
  retrieving revision 1.3
  retrieving revision 1.4
  diff -u -r1.3 -r1.4
  --- TEST.PL	6 Apr 2003 23:31:07 -0000	1.3
  +++ TEST.PL	29 Apr 2003 06:37:47 -0000	1.4
  @@ -1,7 +1,8 @@
   use strict;
  -use warnings FATAL => 'all';
   
   use lib qw(lib ../lib);
  +
  +use warnings FATAL => 'all';
   
   use Apache::TestRun ();