diff options
-rwxr-xr-x | LedgerSMB/IS.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/LedgerSMB/IS.pm b/LedgerSMB/IS.pm index 50931446..6973c04f 100755 --- a/LedgerSMB/IS.pm +++ b/LedgerSMB/IS.pm @@ -1535,7 +1535,7 @@ sub process_assembly { assemblyitem, unit) VALUES (?, ?, ?, ?, 0, 0, ?, 't', ?)|; - $sth = $dbh->prepare($query); + my $sth = $dbh->prepare($query); $sth->execute( $form->{id}, $ref->{description}, $ref->{parts_id}, $ref->{qty}, $allocated, $ref->{unit} ) || $form->dberror($query); |