Merged fix-1047335-crashed-tables

This commit is contained in:
Brian Fraser
2012-11-09 13:48:17 -03:00
17 changed files with 269 additions and 64 deletions

View File

@@ -2563,13 +2563,11 @@ sub get_create_table {
PTDEBUG && _d($show_sql);
my $href;
eval { $href = $dbh->selectrow_hashref($show_sql); };
if ( $EVAL_ERROR ) {
PTDEBUG && _d($EVAL_ERROR);
if ( my $e = $EVAL_ERROR ) {
PTDEBUG && _d($old_sql_mode);
$dbh->do($old_sql_mode);
return;
die $e;
}
PTDEBUG && _d($old_sql_mode);