stas 2004/07/14 23:35:11
Modified: . Makefile.PL
Log:
($2 ? $2 : 0) is better written as ($2||0) ;)
Revision Changes Path
1.146 +1 -1 modperl-2.0/Makefile.PL
Index: Makefile.PL
===================================================================
RCS file: /home/cvs/modperl-2.0/Makefile.PL,v
retrieving revision 1.145
retrieving revision 1.146
diff -u -u -r1.145 -r1.146
--- Makefile.PL 15 Jul 2004 05:40:14 -0000 1.145
+++ Makefile.PL 15 Jul 2004 06:35:11 -0000 1.146
@@ -371,7 +371,7 @@
my $build = shift;
my $perl_version = $];
- $perl_version =~ s/5.00(\d)(?:00(\d))?/"5.$1." . ($2 ? $2 : 0)/e;
+ $perl_version =~ s/5.00(\d)(?:00(\d))?/"5.$1." . ($2||0)/e;
my $perl_threads = Apache::Build::PERL_HAS_ITHREADS ? "w/" : "w/o";
my $perl_string = "Using Perl $perl_version $perl_threads ithreads";
