[prev in list] [next in list] [prev in thread] [next in thread] 

List:       apache-modperl-cvs
Subject:    svn commit: r882407 -
From:       aprime () apache ! org
Date:       2009-11-20 4:05:38
Message-ID: 20091120040538.7C5AB238888F () eris ! apache ! org
[Download RAW message or body]

Author: aprime
Date: Fri Nov 20 04:05:37 2009
New Revision: 882407

URL: http://svn.apache.org/viewvc?rev=882407&view=rev
Log:
Fixed issue with solaris version numbers being treated as decimal numbers, not
dotted tuples.
Fixes RT #38084.

Modified:
    perl/Apache-SizeLimit/trunk/lib/Apache/SizeLimit/Core.pm

Modified: perl/Apache-SizeLimit/trunk/lib/Apache/SizeLimit/Core.pm
URL: http://svn.apache.org/viewvc/perl/Apache-SizeLimit/trunk/lib/Apache/SizeLimit/Core.pm?rev=882407&r1=882406&r2=882407&view=diff
 ==============================================================================
--- perl/Apache-SizeLimit/trunk/lib/Apache/SizeLimit/Core.pm (original)
+++ perl/Apache-SizeLimit/trunk/lib/Apache/SizeLimit/Core.pm Fri Nov 20 04:05:37 2009
@@ -131,7 +131,9 @@
 }
 
 BEGIN {
-    if ($Config{'osname'} eq 'solaris' && $Config{'osvers'} >= 2.6 ) {
+    my ($major,$minor) = split(/\./, $Config{'osvers'});
+    if ($Config{'osname'} eq 'solaris' && 
+        (($major > 2) || ($major == 2 && $minor >= 6))) {
         *_platform_check_size   = \&_solaris_2_6_size_check;
         *_platform_getppid = \&_perl_getppid;
     }


[prev in list] [next in list] [prev in thread] [next in thread]