From 3dea2401927c9ccd10ef8c11505abbab49297c7f Mon Sep 17 00:00:00 2001 From: einhverfr Date: Thu, 21 Jun 2007 18:58:25 +0000 Subject: Fixed error updating custom fields and another error saving project not attached to customer git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/branches/1.2@1291 4979c152-3d1c-0410-bac9-87ea11338e46 --- LedgerSMB/Form.pm | 2 +- LedgerSMB/PE.pm | 2 +- 2 files changed, 2 insertions(+), 2 deletions(-) (limited to 'LedgerSMB') diff --git a/LedgerSMB/Form.pm b/LedgerSMB/Form.pm index 87648020..6c3d3d5a 100755 --- a/LedgerSMB/Form.pm +++ b/LedgerSMB/Form.pm @@ -1537,7 +1537,7 @@ sub run_custom_queries { if ( $query_type eq 'UPDATE' ) { $query = "DELETE FROM $_ WHERE row_id = ?"; my $sth = $dbh->prepare($query); - $sth->execute->( $self->{ "id" . "$linenum" } ) + $sth->execute( $self->{ "id" . "$linenum" } ) || $self->dberror($query); } elsif ( $query_type eq 'INSERT' ) { diff --git a/LedgerSMB/PE.pm b/LedgerSMB/PE.pm index 24247670..4e17360c 100755 --- a/LedgerSMB/PE.pm +++ b/LedgerSMB/PE.pm @@ -204,7 +204,7 @@ sub save_project { my $dbh = $form->{dbh}; - $form->{customer_id} ||= 'NULL'; + $form->{customer_id} ||= undef; $form->{projectnumber} = $form->update_defaults( $myconfig, "projectnumber", $dbh ) -- cgit v1.2.3