Fix for change to the value of `$dbh->err` as suggested by Tim Bunce.
David Wheeler
16 years ago
0 | 0 |
Revision history for Perl extension Exception::Class::DBI.
|
1 | 1 |
|
2 | 2 |
0.96
|
|
3 |
- Fixed test failure due to the change in value of $dbh->err in DBI
|
|
4 |
1.601. First reported by Andreas J. König; fix suggested by Tim
|
|
5 |
Bunce.
|
3 | 6 |
|
4 | 7 |
0.95 2006-07-18T22:14:41
|
5 | 8 |
- Fixed test failure for localized error messages. Reported by Jens
|
32 | 32 |
isa_ok( $err, 'Exception::Class::DBI::DBH' );
|
33 | 33 |
|
34 | 34 |
# Check the accessor values.
|
35 | |
is( $err->err, (DBI->VERSION >= '1.601' ? '2000000000' : '1'), "Check err" );
|
|
35 |
is( $err->err, $DBI::stderr || 1, "Check err" );
|
36 | 36 |
is( $err->errstr, 'Unknown field names: foo', "Check errstr" );
|
37 | 37 |
is( $err->error, 'DBD::ExampleP::db do failed: Unknown field names: foo',
|
38 | 38 |
"Check error" );
|