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/24 11:23:47 UTC

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

Author: pgollucci
Date: Thu Aug 24 02:23:47 2006
New Revision: 434354

URL: http://svn.apache.org/viewvc?rev=434354&view=rev
Log:
fix the deprecated apis by moving into target specific classes.

This might not be the best way since will duplicate the code exactly, but
it seems the most straight forward


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=434354&r1=434353&r2=434354&view=diff
==============================================================================
--- perl/Apache-SizeLimit/trunk/lib/Apache/SizeLimit.pm (original)
+++ perl/Apache-SizeLimit/trunk/lib/Apache/SizeLimit.pm Thu Aug 24 02:23:47 2006
@@ -112,6 +112,37 @@
     return Apache::Constants::OK();
 }
 
+{
+    # Deprecated APIs
+
+    sub setmax {
+
+        my $class = __PACKAGE__;
+
+        $class->set_max_process_size(shift);
+
+        $class->add_cleanup_handler();
+    }
+
+    sub setmin {
+
+        my $class = __PACKAGE__;
+
+        $class->set_min_shared_size(shift);
+
+        $class->add_cleanup_handler();
+    }
+
+    sub setmax_unshared {
+
+        my $class = __PACKAGE__;
+
+        $class->set_max_unshared_size(shift);
+
+        $class->add_cleanup_handler();
+    }
+}
+
 1;
 
 __END__