summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xLedgerSMB/Form.pm2
-rwxr-xr-xLedgerSMB/PE.pm2
2 files changed, 2 insertions, 2 deletions
diff --git a/LedgerSMB/Form.pm b/LedgerSMB/Form.pm
index 601b74c1..d728f428 100755
--- a/LedgerSMB/Form.pm
+++ b/LedgerSMB/Form.pm
@@ -2408,7 +2408,7 @@ sub update_status {
my $dbh = $self->{dbh};
my %queued = split / +/, $self->{queued};
- my $spoolfile = ($queued{$self->{formname}}) ? "'$queued{$self->{formname}}'" : 'NULL';
+ my $spoolfile = ($queued{$self->{formname}}) ? "'$queued{$self->{formname}}'" : undef;
my $query = qq|DELETE FROM status
WHERE formname = ?
diff --git a/LedgerSMB/PE.pm b/LedgerSMB/PE.pm
index 58d7a6cf..8012ad7d 100755
--- a/LedgerSMB/PE.pm
+++ b/LedgerSMB/PE.pm
@@ -207,7 +207,7 @@ sub save_project {
my $dbh = $form->{dbh};
- $form->{customer_id} ||= 'NULL';
+ $form->{customer_id} ||= undef;
$form->{projectnumber}
= $form->update_defaults($myconfig, "projectnumber", $dbh)