stas        2004/07/14 22:37:51

  Modified:    .        Makefile.PL
  Log:
  fix the conversion from $] to a familiar version number to print 5.6.0
  instead of 5.6, and 5.8.0 instead of 5.8
  
  Revision  Changes    Path
  1.144     +1 -1      modperl-2.0/Makefile.PL
  
  Index: Makefile.PL
  ===================================================================
  RCS file: /home/cvs/modperl-2.0/Makefile.PL,v
  retrieving revision 1.143
  retrieving revision 1.144
  diff -u -u -r1.143 -r1.144
  --- Makefile.PL       5 Jul 2004 22:02:42 -0000       1.143
  +++ Makefile.PL       15 Jul 2004 05:37:51 -0000      1.144
  @@ -371,7 +371,7 @@
       my $build = shift;
   
       my $perl_version = $];
  -    $perl_version =~ s/5.00(\d)(?:00(\d))?/"5.$1" . ($2 ? ".$2" : "")/e;
  +    $perl_version =~ s/5.00(\d)(?:00(\d))?/"5.$1." . ($2 ? $2 : 0)/e;
       my $perl_threads = Apache::Build::PERL_HAS_ITHREADS ? "w/" : "w/o";
       my $perl_string = "Using Perl $perl_version $perl_threads ithreads";
   
  
  
  

Reply via email to