- my ($self, $config, $namespace, $dsn, $u, $p) = @_;
- $config->{dsn} = $dsn;
+ my ( $self, $config, $namespace, $dsn, $u, $p, $opts ) = @_;
+ $dsn ||= $config->{dsn};
+ $u ||= $config->{user};
+ $p ||= $config->{pass};
+ $opts ||= $config->{opts};
+ $config->{dsn} = $dsn;