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

diff --git a/src/perlmods/OpenSRF/Application/Demo/Math.pm b/src/perlmods/OpenSRF/Application/Demo/Math.pm
index a9208af..0faba6b 100644 (file)
--- 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");
+               }
 
        }
 }