From 5266e8e33eb832b3b138d0b8a88ea1362c9398c6 Mon Sep 17 00:00:00 2001
From: miker <miker@9efc2488-bf62-4759-914b-345cdb29e865>
Date: Thu, 6 Apr 2006 01:03:04 +0000
Subject: [PATCH] oopsie ... off-by-one potentially causing unbalanced session
 use

git-svn-id: svn://svn.open-ils.org/OpenSRF/trunk@679 9efc2488-bf62-4759-914b-345cdb29e865
---
 src/perlmods/OpenSRF/MultiSession.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/perlmods/OpenSRF/MultiSession.pm b/src/perlmods/OpenSRF/MultiSession.pm
index 8b04732..9157cec 100644
--- a/src/perlmods/OpenSRF/MultiSession.pm
+++ b/src/perlmods/OpenSRF/MultiSession.pm
@@ -177,7 +177,7 @@ sub request {
 
 	if ($self->running < $self->request_cap ) {
 		my $index = $self->session_hash_function->($self, $method, @params);
-		my $ses = $self->{sessions}->[($index % $self->session_cap ) - 1]; 
+		my $ses = $self->{sessions}->[$index % $self->session_cap]; 
 
 		#print "Running $method using session ".$ses->session_id."\n";
 
-- 
2.11.0