Author: spadkins
Date: Fri May 7 06:27:07 2010
New Revision: 13960
Modified:
p5ee/trunk/App-Repository/lib/App/Repository/DBI.pm
Log:
fixed: insert needs to throw an error
Modified: p5ee/trunk/App-Repository/lib/App/Repository/DBI.pm
==============================================================================
--- p5ee/trunk/App-Repository/lib/App/Repository/DBI.pm (original)
+++ p5ee/trunk/App-Repository/lib/App/Repository/DBI.pm Fri May 7 06:27:07 2010
@@ -2154,6 +2154,12 @@
die $e;
}
}
+ else {
+ $loglevel = 3;
+ $bind_values = join("|", map { defined $_ ? $_ : "undef" }
@$row);
+ $self->{context}->log({level=>$loglevel}, "DBI Exception
(fail) in _insert_row(): ${e}BIND VALUES: [$bind_values]\nSQL: $sql");
+ die $e;
+ }
}
}
$nrows = 1 if ($nrows);
