From: Bill Erickson Date: Wed, 26 Feb 2014 19:23:25 +0000 (-0500) Subject: perl max_chunk_size additions X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=cc8738ed8250239cdd868c8beea65f425a5d3c48;p=working%2FOpenSRF.git perl max_chunk_size additions * Class definitions for Partial and PartialComplete need unique class hints. * Fixed class name copy/paste-o Signed-off-by: Bill Erickson --- diff --git a/src/perl/lib/OpenSRF/DomainObject/oilsResponse.pm b/src/perl/lib/OpenSRF/DomainObject/oilsResponse.pm index 25d8f50..23a68be 100644 --- a/src/perl/lib/OpenSRF/DomainObject/oilsResponse.pm +++ b/src/perl/lib/OpenSRF/DomainObject/oilsResponse.pm @@ -284,7 +284,10 @@ package OpenSRF::DomainObject::oilsResult::Partial; use OpenSRF::DomainObject::oilsResponse qw/:status/; use base 'OpenSRF::DomainObject::oilsResult'; use vars qw/$status $statusCode/; -OpenSRF::Utils::JSON->register_class_hint( hint => 'osrfResult', name => 'OpenSRF::DomainObject::oilsResult::Partial', type => 'hash' ); +OpenSRF::Utils::JSON->register_class_hint( + hint => 'osrfResultPartial', + name => 'OpenSRF::DomainObject::oilsResult::Partial', + type => 'hash'); $status = 'Partial Response'; @@ -324,7 +327,10 @@ package OpenSRF::DomainObject::oilsResult::PartialComplete; use OpenSRF::DomainObject::oilsResponse qw/:status/; use base 'OpenSRF::DomainObject::oilsResult'; use vars qw/$status $statusCode/; -OpenSRF::Utils::JSON->register_class_hint( hint => 'osrfResult', name => 'OpenSRF::DomainObject::oilsResult::Partial', type => 'hash' ); +OpenSRF::Utils::JSON->register_class_hint( + hint => 'osrfResultPartialComplete', + name => 'OpenSRF::DomainObject::oilsResult::PartialComplete', + type => 'hash'); $status = 'Partial Response Finalized';