From 51a2a43fab6f3168e051e364237c54a38ec4f6bc Mon Sep 17 00:00:00 2001 From: erickson Date: Tue, 8 Feb 2005 15:31:11 +0000 Subject: [PATCH] added exception passing from dbmath through math back to the client git-svn-id: svn://svn.open-ils.org/OpenSRF/trunk@30 9efc2488-bf62-4759-914b-345cdb29e865 --- src/perlmods/OpenSRF/Application/Demo/Math.pm | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) diff --git a/src/perlmods/OpenSRF/Application/Demo/Math.pm b/src/perlmods/OpenSRF/Application/Demo/Math.pm index a9208af..0faba6b 100644 --- a/src/perlmods/OpenSRF/Application/Demo/Math.pm +++ b/src/perlmods/OpenSRF/Application/Demo/Math.pm @@ -63,7 +63,11 @@ sub send_request { else{ $log->debug( "Math received empty value", ERROR ); } $req->finish; $session->finish; - throw OpenSRF::EX::ERROR ("Did not receive expected data from MathDB"); + if( $resp ) { + throw OpenSRF::EX::ERROR ("Did not receive expected data from MathDB\n" . $resp); + } else { + throw OpenSRF::EX::ERROR ("Received no data from MathDB"); + } } } -- 2.11.0