diff options
| -rwxr-xr-x | LedgerSMB/CP.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/LedgerSMB/CP.pm b/LedgerSMB/CP.pm index d95e716c..3722a265 100755 --- a/LedgerSMB/CP.pm +++ b/LedgerSMB/CP.pm @@ -423,7 +423,7 @@ sub post_payment { $sth = $dbh->prepare($query); $sth->execute($form->{"id_$i"}, $id, $form->{date_paid}, $amount * $ml) - || $form->dberror($query, 'CP.pm', 427); + || $form->dberror($query, __file__, __line__); # add payment $query = qq| |