diff options
Diffstat (limited to 'LedgerSMB/User.pm')
| -rw-r--r-- | LedgerSMB/User.pm | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/LedgerSMB/User.pm b/LedgerSMB/User.pm index 6107cfcb..0b295455 100644 --- a/LedgerSMB/User.pm +++ b/LedgerSMB/User.pm @@ -204,9 +204,7 @@ Disused function to return the number of current recurring events. sub check_recurring { my ( $self, $form ) = @_; - my $dbh = - DBI->connect( $self->{dbconnect}, $self->{dbuser}, $self->{dbpasswd} ) - or $form->dberror( __FILE__ . ':' . __LINE__ ); + my $dbh = $form->{dbh}; $dbh->{pg_encode_utf8} = 1; my $query = qq| |