cleaning up startup logging
authorerickson <erickson@9efc2488-bf62-4759-914b-345cdb29e865>
Thu, 29 Jun 2006 17:20:48 +0000 (17:20 +0000)
committererickson <erickson@9efc2488-bf62-4759-914b-345cdb29e865>
Thu, 29 Jun 2006 17:20:48 +0000 (17:20 +0000)
git-svn-id: svn://svn.open-ils.org/OpenSRF/trunk@742 9efc2488-bf62-4759-914b-345cdb29e865

src/perlmods/OpenSRF/System.pm

index e8833ed..7dcf2c3 100644 (file)
@@ -217,10 +217,9 @@ sub bootstrap {
 
        _log( " * System is ready..." );
 
-       sleep 1;
-       my $ps = `ps ax | grep " Open" | grep -v grep | sort -r -k5`;
-
-       print "\n --- PS --- \n$ps --- PS ---\n\n";
+#      sleep 1;
+#      my $ps = `ps ax | grep " Open" | grep -v grep | sort -r -k5`;
+#      print "\n --- PS --- \n$ps --- PS ---\n\n";
 
        while( 1 ) { sleep; }
        exit;
@@ -465,7 +464,7 @@ sub hupall {
 sub _log {
        my $string = shift;
        OpenSRF::Utils::Logger->debug( $string, INFO );
-       #print $string . "\n";
+       print $string . "\n";
 }
 
 # ----------------------------------------------