summary |
shortlog |
log |
commit | commitdiff |
tree
raw |
patch |
inline | side by side (from parent 1:
26c9a78)
- my ($self, $config, $namespace, $dsn) = @_;
+ my ($self, $config, $namespace, $dsn, $u, $p) = @_;
$config->{dsn} = $dsn;
$config->{loader} = Class::DBI::Loader->new(
namespace => $namespace,
$config->{dsn} = $dsn;
$config->{loader} = Class::DBI::Loader->new(
namespace => $namespace,
+ dsn => $dsn,
+ user => $u,
+ password => $p,
);
$config->{classes} = [ $config->{loader}->classes ];
$config->{tables} = [ $config->{loader}->tables ];
);
$config->{classes} = [ $config->{loader}->classes ];
$config->{tables} = [ $config->{loader}->tables ];