added a sanity check

git-svn-id: svn://svn.open-ils.org/OpenSRF/trunk@67 9efc2488-bf62-4759-914b-345cdb29e865

diff --git a/src/perlmods/OpenSRF/DomainObject/oilsMessage.pm b/src/perlmods/OpenSRF/DomainObject/oilsMessage.pm
index 2ebc774..73a82b9 100644 (file)
--- 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();
        }