From c83ad50cd99fbee8d292a3c10d35b5450948cb2d Mon Sep 17 00:00:00 2001
From: miker <miker@9efc2488-bf62-4759-914b-345cdb29e865>
Date: Wed, 2 Mar 2005 22:51:11 +0000
Subject: [PATCH] allow max_requests to be infinite on the server side

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

diff --git a/src/perlmods/OpenSRF/AppSession.pm b/src/perlmods/OpenSRF/AppSession.pm
index cf58528..99b26fe 100644
--- a/src/perlmods/OpenSRF/AppSession.pm
+++ b/src/perlmods/OpenSRF/AppSession.pm
@@ -153,6 +153,7 @@ sub service { return shift()->{service}; }
 sub continue_request {
 	my $self = shift;
 	$self->{'requests'}++;
+	return 1 if (!$self->{'max_requests'});
 	return $self->{'requests'} <= $self->{'max_requests'} ? 1 : 0;
 }
 
-- 
2.43.2