From 752e1fbf91be406811cc2d8f35677af62c619eb3 Mon Sep 17 00:00:00 2001 From: erickson Date: Mon, 13 Dec 2010 14:58:04 +0000 Subject: [PATCH] on second thought, removing debug sleep method, which is (more than most) a DOS waiting to happen. git-svn-id: svn://svn.open-ils.org/OpenSRF/branches/rel_2_0@2127 9efc2488-bf62-4759-914b-345cdb29e865 --- src/perl/lib/OpenSRF/Application.pm | 21 --------------------- 1 file changed, 21 deletions(-) diff --git a/src/perl/lib/OpenSRF/Application.pm b/src/perl/lib/OpenSRF/Application.pm index 29787e2..8ccf568 100644 --- a/src/perl/lib/OpenSRF/Application.pm +++ b/src/perl/lib/OpenSRF/Application.pm @@ -743,25 +743,4 @@ sub make_stream_atomic { 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; - - -- 2.43.2