From: Bill Erickson <berick@esilibrary.com>
Date: Wed, 26 Feb 2014 20:29:41 +0000 (-0500)
Subject: perl max_chunk_size raise size
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=3c07e703011b81e6f6224c74131d772d4d581ecf;p=working%2FOpenSRF.git

perl max_chunk_size raise size

Signed-off-by: Bill Erickson <berick@esilibrary.com>
---

diff --git a/src/perl/lib/OpenSRF/Application.pm b/src/perl/lib/OpenSRF/Application.pm
index fedd902..8aec164 100644
--- a/src/perl/lib/OpenSRF/Application.pm
+++ b/src/perl/lib/OpenSRF/Application.pm
@@ -65,7 +65,7 @@ sub max_chunk_size {
 	my $self = shift;
 	return 0 unless ref($self);
 	return $self->{max_chunk_size} if (defined($self->{max_chunk_size}));
-	return 2 * $self->max_bundle_size;
+	return 104858; # 1/10 MB
 }
 
 sub api_name {