make it clear the error message coming from mysql

PASApipeline · 9f73a9903c675fbb215417e1c0ae1effa3bcf0c0 · brianjohnhaas committed Feb 20, 2015 · Feb 20, 2015 · 9f73a99
1 parent 7309955
commit 9f73a9903c675fbb215417e1c0ae1effa3bcf0c0
Unified Split

Showing with 1 addition and 1 deletion.

+1 −1 PerlLib/Mysql_connect.pm
diff --git a/PerlLib/Mysql_connect.pm b/PerlLib/Mysql_connect.pm
@@ -136,7 +136,7 @@ sub do_sql_2D {
                     return (&do_sql_2D($dbproc, $query, @values));
                 }
                 else {
-                    print STDERR "failed query: <$query>\tvalues: @values\nErrors: $DBI::errstr\n";
+                    print STDERR "\n\n====\nFailed query: <$query>\tvalues: @values\nErrors: $DBI::errstr\n====\n";
                     $QUERYFAIL = 1;
                 }
             }