perl-dev mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From Adam Prime <adam.pr...@utoronto.ca>
Subject Re: svn commit: r882407 - /perl/Apache-SizeLimit/trunk/lib/Apache/SizeLimit/Core.pm
Date Fri, 20 Nov 2009 04:09:10 GMT
Can someone change this ticket to resolved (or whatever is appropriate)

https://rt.cpan.org/Ticket/Display.html?id=38084

I can't.

Adam

aprime@apache.org wrote:
> 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;
>      }
> 
> 


---------------------------------------------------------------------
To unsubscribe, e-mail: dev-unsubscribe@perl.apache.org
For additional commands, e-mail: dev-help@perl.apache.org


Mime
View raw message