diff options
author | tetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46> | 2006-11-16 01:14:50 +0000 |
---|---|---|
committer | tetragon <tetragon@4979c152-3d1c-0410-bac9-87ea11338e46> | 2006-11-16 01:14:50 +0000 |
commit | d926f740de793966a8d3b6aa6c77f9da90121cf0 (patch) | |
tree | aea1c1818b68654e41c12b8657c4793009bbfde7 /LedgerSMB/IS.pm | |
parent | 0980a3535f3aeb288ed4c5cc842ee74b6eca8786 (diff) |
Removing $query arguments from $sth->fetchrow_array calls
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@633 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'LedgerSMB/IS.pm')
-rwxr-xr-x | LedgerSMB/IS.pm | 4 |
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; |