From: miker <miker@9efc2488-bf62-4759-914b-345cdb29e865>
Date: Mon, 24 Apr 2006 03:21:43 +0000 (+0000)
Subject: fixing recursion bug
X-Git-Tag: osrf_rel_2_0_1~1168
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=80f39bc0b503c711a89cb1319f69a2e5b04ce6d7;p=OpenSRF.git

fixing recursion bug


git-svn-id: svn://svn.open-ils.org/OpenSRF/trunk@705 9efc2488-bf62-4759-914b-345cdb29e865
---

diff --git a/src/perlmods/OpenSRF/MultiSession.pm b/src/perlmods/OpenSRF/MultiSession.pm
index 6a02476..dd0579c 100644
--- a/src/perlmods/OpenSRF/MultiSession.pm
+++ b/src/perlmods/OpenSRF/MultiSession.pm
@@ -196,6 +196,7 @@ sub request {
 		push @{ $self->{running} },
 			{ req => $req,
 			  meth => $method,
+			  hash => $hash_param,
 			  params => [@params]
 			};
 
@@ -223,7 +224,7 @@ sub session_wait {
 		}
 		return $count;
 	} else {
-		while(($count = $self->session_reap) > 0) {
+		while(($count = $self->session_reap) == 0 && $self->running) {
 			usleep 100;
 		}
 		return $count;