From: tla <tla@mit.edu>
Date: Wed, 15 Jan 2014 16:41:48 +0000 (+0100)
Subject: fix bug in IDP error logging
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=e4e86473b3f0d2aea0fb9dbb32e6f7ffe57481d4;p=scpubgit%2Fstemmatology.git

fix bug in IDP error logging
---

diff --git a/analysis/idp_server/graphcalc_worker.pl b/analysis/idp_server/graphcalc_worker.pl
index c7b0f8b..4413acf 100755
--- a/analysis/idp_server/graphcalc_worker.pl
+++ b/analysis/idp_server/graphcalc_worker.pl
@@ -118,8 +118,9 @@ sub run_idp {
             
             my $got_error;
             say STDERR "IDP run output:\n$err";
-            if( $err =~ /^Error:/m ) {
+            if( $err =~ / Error:/m ) {
                 $idpanswer{$program} = 'error';
+                say STDERR "Input data was " . decode_utf8( $datastr );
             } else {
 				# Save the result for the given program
 				try {