From 8d8408afbc87eae291923a1d8a0d7fc35589e45e Mon Sep 17 00:00:00 2001
From: erickson <erickson@9efc2488-bf62-4759-914b-345cdb29e865>
Date: Thu, 29 Mar 2007 20:06:05 +0000
Subject: [PATCH] removed some old code and the unnecessary select-as-sleep
 calls

git-svn-id: svn://svn.open-ils.org/OpenSRF/trunk@859 9efc2488-bf62-4759-914b-345cdb29e865
---
 src/perlmods/OpenSRF/System.pm | 28 +---------------------------
 1 file changed, 1 insertion(+), 27 deletions(-)

diff --git a/src/perlmods/OpenSRF/System.pm b/src/perlmods/OpenSRF/System.pm
index c88324f..6d152a7 100644
--- a/src/perlmods/OpenSRF/System.pm
+++ b/src/perlmods/OpenSRF/System.pm
@@ -206,14 +206,12 @@ sub bootstrap {
 	# --- Boot the Unix servers
 	$self->launch_unix($apps);
 
-
-	_sleep();
 	sleep 2;
 
 	# --- Boot the listeners
 	$self->launch_listener($apps);
 
-	_sleep();
+    sleep 1;
 
 	_log( " * System is ready..." );
 
@@ -400,27 +398,6 @@ sub launch_listener {
 	}
 }
 
-# ----------------------------------------------
-
-=head comment
-sub launch_shell {
-
-	my $self = shift;
-
-	my $pid = OpenSRF::Utils::safe_fork();
-
-	if( $pid ) { $self->pid_hash( $pid , _shell() ); }
-	else {
-		$0 = "System Shell";
-		for( my $x = 0; $x != 10; $x++ ) {
-			eval _shell();
-			if( ! $@ ) { last; }
-		}
-		exit;
-	}
-}
-=cut
-
 
 # ----------------------------------------------
 
@@ -467,9 +444,6 @@ sub _log {
 
 # ----------------------------------------------
 
-sub _sleep {
-	select( undef, undef, undef, 0.3 );
-}
 
 1;
 
-- 
2.11.0