From: erickson Date: Thu, 29 Mar 2007 20:06:05 +0000 (+0000) Subject: removed some old code and the unnecessary select-as-sleep calls X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=8d8408afbc87eae291923a1d8a0d7fc35589e45e;p=opensrf%2Fbjwebb.git 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 --- 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;