From: erickson <erickson@9efc2488-bf62-4759-914b-345cdb29e865>
Date: Mon, 25 Jul 2005 01:34:06 +0000 (+0000)
Subject: added exception for when trying to send to non-existant recipient
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=a4c73f9f79231e0c3fc77190ff5571f389444079;p=opensrf%2Fbjwebb.git

added exception for when trying to send to non-existant recipient
this will prevent some of the vague 'no app_session returned from server build' errors


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

diff --git a/src/perlmods/OpenSRF/Transport.pm b/src/perlmods/OpenSRF/Transport.pm
index f669dbe..09950fd 100644
--- a/src/perlmods/OpenSRF/Transport.pm
+++ b/src/perlmods/OpenSRF/Transport.pm
@@ -90,6 +90,12 @@ sub handler {
 	my $body	= $helper->get_body();
 	my $type	= $helper->get_msg_type();
 
+
+	if (defined($type) and $type eq 'error') {
+		throw OpenSRF::EX::Session ("$remote_id IS NOT CONNECTED TO THE NETWORK!!!");
+
+	}
+
 	$logger->transport( 
 			"Transport building/retrieving session: $service, $remote_id, $sess_id", DEBUG );