You are viewing a plain text version of this content. The canonical link for it is here.
Posted to modperl-cvs@perl.apache.org by pg...@apache.org on 2006/08/23 06:53:07 UTC

svn commit: r433899 - /perl/Apache-SizeLimit/trunk/lib/Apache/SizeLimit.pm

Author: pgollucci
Date: Tue Aug 22 21:53:05 2006
New Revision: 433899

URL: http://svn.apache.org/viewvc?rev=433899&view=rev
Log:
style guide

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

Modified: perl/Apache-SizeLimit/trunk/lib/Apache/SizeLimit.pm
URL: http://svn.apache.org/viewvc/perl/Apache-SizeLimit/trunk/lib/Apache/SizeLimit.pm?rev=433899&r1=433898&r2=433899&view=diff
==============================================================================
--- perl/Apache-SizeLimit/trunk/lib/Apache/SizeLimit.pm (original)
+++ perl/Apache-SizeLimit/trunk/lib/Apache/SizeLimit.pm Tue Aug 22 21:53:05 2006
@@ -30,7 +30,7 @@
     return DECLINED unless $r->is_main();
 
     # we want to operate in a cleanup handler
-    if ( $r->current_callback eq 'PerlCleanupHandler' ) {
+    if ($r->current_callback eq 'PerlCleanupHandler') {
         return $class->_exit_if_too_big($r);
     }
     else {
@@ -51,14 +51,13 @@
     # test it, since apparently it does not push a handler onto the
     # PerlCleanupHandler phase. That means that there's no way to use
     # $r->get_handlers() to check the results of calling this method.
-    $r->push_handlers( 'PerlCleanupHandler',
-                       sub { $class->_exit_if_too_big(shift) } );
-    $r->pnotes( size_limit_cleanup => 1 );
+    $r->push_handlers('PerlCleanupHandler',
+                      sub { $class->_exit_if_too_big(shift) });
+    $r->pnotes(size_limit_cleanup => 1);
 }
 
 1;
 
-
 __END__
 
 =head1 NAME
@@ -79,14 +78,14 @@
 
 ******************************** NOIICE *******************
 
-    This version is only for httpd 1.x and mod_perl 1.x 
+    This version is only for httpd 1.x and mod_perl 1.x
     series.
 
     Future versions of this module may support both.
 
-    Currently, Apache2::SizeLimit is bundled with 
+    Currently, Apache2::SizeLimit is bundled with
     mod_perl 2.x for that series.
-    
+
 ******************************** NOTICE *******************
 
 This module allows you to kill off Apache httpd processes if they grow