summaryrefslogtreecommitdiff
path: root/LedgerSMB/IS.pm
diff options
context:
space:
mode:
Diffstat (limited to 'LedgerSMB/IS.pm')
-rwxr-xr-xLedgerSMB/IS.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/LedgerSMB/IS.pm b/LedgerSMB/IS.pm
index e7e22cd8..3dfc54ff 100755
--- a/LedgerSMB/IS.pm
+++ b/LedgerSMB/IS.pm
@@ -762,7 +762,7 @@ sub project_description {
$sth = $dbh->prepare($query);
$sth->execute($id);
- ($_) = $sth->fetchrow_array($query);
+ ($_) = $sth->fetchrow_array;
$_;
@@ -1573,7 +1573,7 @@ sub reverse_invoice {
my $sth;
$sth = $dbh->prepare($query);
$sth->execute($form->{id});
- my ($id) = $sth->fetchrow_array($query);
+ my ($id) = $sth->fetchrow_array;
return unless $id;