From: erickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Date: Thu, 9 Jun 2005 15:50:39 +0000 (+0000)
Subject: fixed name issue for process
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=250aacde0af710c867ecf3a7575d9f270b8544ba;p=Evergreen.git

fixed name issue for process


git-svn-id: svn://svn.open-ils.org/ILS/trunk@793 dcc99617-32d9-48b4-a31d-7c20da2025e4
---

diff --git a/OpenSRF/src/perlmods/OpenSRF/UnixServer.pm b/OpenSRF/src/perlmods/OpenSRF/UnixServer.pm
index ce4d93b336..b8b1402068 100644
--- a/OpenSRF/src/perlmods/OpenSRF/UnixServer.pm
+++ b/OpenSRF/src/perlmods/OpenSRF/UnixServer.pm
@@ -67,15 +67,17 @@ sub process_request {
 	my $data; my $d;
 	while( $d = <STDIN> ) { $data .= $d; }
 
+	
 	my $orig = $0;
 	$0 = "$0*";
 
-
 	if( ! $data or ! defined( $data ) or $data eq "" ) {
 		$logger->debug("Unix child received empty data from socket", ERROR);
+		$0 = $orig;
 		return;
 	}
 
+
 	if( ! close( $self->{server}->{client} ) ) {
 		$logger->debug( "Error closing Unix socket: $!", ERROR );
 	}