bless $self, 'DBIx::Class::Storage:DBI::Sybase::NoBindVars';
$self->_rebless;
}
- $self->connect_call_datetime_setup;
- $self->connect_call_blob_setup;
}
}
}
-sub _populate_dbh {
- my $self = shift;
- $self->next::method(@_);
- $self->connect_call_datetime_setup;
- $self->connect_call_blob_setup;
- 1;
-}
-
=head2 connect_call_blob_setup
Used as:
unless ($storage_type eq 'DBI::Sybase') { # autodetect
$schema->storage_type("::$storage_type");
}
- $schema->connection($dsn, $user, $pass, {AutoCommit => 1});
+ $schema->connection($dsn, $user, $pass, {
+ AutoCommit => 1,
+ on_connect_call => [
+ [ 'datetime_setup' ],
+ [ blob_setup => log_on_update => 1 ], # this is a safer option
+ ],
+ });
$schema->storage->ensure_connected;