diff options
Diffstat (limited to 'LedgerSMB/Form.pm')
| -rw-r--r-- | LedgerSMB/Form.pm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/LedgerSMB/Form.pm b/LedgerSMB/Form.pm index c06c9391..02bd44aa 100644 --- a/LedgerSMB/Form.pm +++ b/LedgerSMB/Form.pm @@ -1139,8 +1139,12 @@ sub db_init { $self->{company} = $LedgerSMB::Sysconfig::default_db; } my $dbname = $self->{company}; + my $dbconfig = { dbconnect => "dbi:Pg:dbname=$dbname", + dbuser => $login, + dbpasswd => $password + }; - $self->{dbh} = $self->dbconnect_noauto($myconfig) || $self->dberror(); + $self->{dbh} = $self->dbconnect_noauto($dbconfig) || $self->dberror(); my $dbh = $self->{dbh}; my %date_query = ( 'mm/dd/yy' => 'set DateStyle to \'SQL, US\'', |