[Opensrf-commits] r2127 - branches/rel_2_0/src/perl/lib/OpenSRF (erickson)

[svn at svn.open-ils.org]

Author: erickson
Date: 2010-12-13 09:58:04 -0500 (Mon, 13 Dec 2010)
New Revision: 2127

Modified:
   branches/rel_2_0/src/perl/lib/OpenSRF/Application.pm
Log:
on second thought, removing debug sleep method, which is (more than most) a DOS waiting to happen.

Modified: branches/rel_2_0/src/perl/lib/OpenSRF/Application.pm
===================================================================
--- branches/rel_2_0/src/perl/lib/OpenSRF/Application.pm	2010-12-13 14:57:44 UTC (rev 2126)
+++ branches/rel_2_0/src/perl/lib/OpenSRF/Application.pm	2010-12-13 14:58:04 UTC (rev 2127)
@@ -743,25 +743,4 @@
 	return \@results;
 }
 
-
-__PACKAGE__->register_method(
-	method => 'sleep_method',
-	argc => 1,
-	api_name => 'opensrf.system.sleep',
-	signature => {
-		desc => q/Causes the backend process to sleep for the specified amount of time/,
-        params => [ {desc => q/Number of seconds to sleep;  defaults to 1/, type => 'number'} ],
-		return => { desc => q/The number of seconds slept/, type => 'number' }
-	}
-);
-
-sub sleep_method {
-	my($self, $client, $secs) = @_;
-    $secs ||= 1;
-    CORE::sleep($secs);
-    return $secs;
-}
-
 1;
-
-