summaryrefslogtreecommitdiff
path: root/LedgerSMB/Form.pm
diff options
context:
space:
mode:
Diffstat (limited to 'LedgerSMB/Form.pm')
-rwxr-xr-xLedgerSMB/Form.pm6
1 files changed, 1 insertions, 5 deletions
diff --git a/LedgerSMB/Form.pm b/LedgerSMB/Form.pm
index c30d70eb..d9c1fac2 100755
--- a/LedgerSMB/Form.pm
+++ b/LedgerSMB/Form.pm
@@ -2569,7 +2569,6 @@ sub save_recurring {
$enddate, $nextdate, $s{repeat}, $s{unit}, $s{howmany},
$s{payment});
- $dbh->do($query) || $self->dberror($query);
my @p;
my $p;
@@ -2627,10 +2626,7 @@ sub save_intnotes {
my $dbh = $self->dbconnect($myconfig);
- my $query = qq|
- UPDATE $vc
- SET intnotes = |.$dbh->quote($self->{intnotes}).qq|
- WHERE id = ?|;
+ my $query = qq|UPDATE $vc SET intnotes = ? WHERE id = ?|;
$sth=$dbh->prepare($query);
$sth->execute($self->{intnotes}, $self->{id}) || $self->dberror($query);