From 637510142a96db6a8695f03c16dd1eb0db397585 Mon Sep 17 00:00:00 2001 From: erickson Date: Wed, 16 Feb 2005 17:16:18 +0000 Subject: [PATCH] added a sanity check git-svn-id: svn://svn.open-ils.org/OpenSRF/trunk@67 9efc2488-bf62-4759-914b-345cdb29e865 --- src/perlmods/OpenSRF/DomainObject/oilsMessage.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/perlmods/OpenSRF/DomainObject/oilsMessage.pm b/src/perlmods/OpenSRF/DomainObject/oilsMessage.pm index 2ebc774..73a82b9 100644 --- a/src/perlmods/OpenSRF/DomainObject/oilsMessage.pm +++ b/src/perlmods/OpenSRF/DomainObject/oilsMessage.pm @@ -282,7 +282,7 @@ sub do_client { # This should be changed to check the type of response (is it a connectException?, etc.) } - if( $self->payload->class->isa( "OpenSRF::EX" ) ) { + if( $self->payload and $self->payload->class->isa( "OpenSRF::EX" ) ) { $self->payload->throw(); } -- 2.11.0