- fix: 7.4 Editing SQL Form seems to break site ...?

This commit is contained in:
JT Smith 2007-03-09 05:38:44 +00:00
parent 3c7bfb6595
commit 172985e2a0
6 changed files with 33 additions and 43 deletions

View file

@ -317,12 +317,10 @@ sub connect {
my $user = shift;
my $pass = shift;
my $dbh = DBI->connect($dsn,$user,$pass,{RaiseError=>0,AutoCommit=>1 });
unless (defined $dbh) {
$session->setDbNotAvailable;
$session->errorHandler->fatal("Couldn't connect to database.");
$session->errorHandler->error("Couldn't connect to database: $dsn");
return undef;
}
if ( $dsn =~ /Oracle/ || $dsn =~ /ODBC/ ) { # Set specific attributes for long Oracle and ODBC DSNs
$dbh->{LongReadLen} = 512 * 1024;
$dbh->{LongTruncOk} = 1;