diff options
| author | Ivan Kohler <ivan@freeside.biz> | 2012-04-04 15:41:26 -0700 |
|---|---|---|
| committer | Ivan Kohler <ivan@freeside.biz> | 2012-04-04 15:41:26 -0700 |
| commit | 685f35c0d8d08ea7bbf2ac7cf2db19cdc79fcccf (patch) | |
| tree | 889923eeb7908d7c8121accb2fea8d89ea4fb31d /httemplate/edit/process/cust_pay.cgi | |
| parent | 3075e4648ca64d58c3458195ddda34235b4aae59 (diff) | |
| parent | 341ee4847da0f09898b07f35e5b3d43d3b687805 (diff) | |
Merge branch 'FREESIDE_2_3_BRANCH' of git.freeside.biz:/home/git/freeside into FREESIDE_2_3_BRANCH
Diffstat (limited to 'httemplate/edit/process/cust_pay.cgi')
| -rwxr-xr-x | httemplate/edit/process/cust_pay.cgi | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/httemplate/edit/process/cust_pay.cgi b/httemplate/edit/process/cust_pay.cgi index e74f9022f..06f5e64d5 100755 --- a/httemplate/edit/process/cust_pay.cgi +++ b/httemplate/edit/process/cust_pay.cgi @@ -28,6 +28,8 @@ %} <%init> +my $conf = FS::Conf->new; + $cgi->param('linknum') =~ /^(\d+)$/ or die "Illegal linknum: ". $cgi->param('linknum'); my $linknum = $1; @@ -46,6 +48,7 @@ my $new = new FS::cust_pay ( { $_, scalar($cgi->param($_)); } qw( paid payby payinfo paybatch pkgnum discount_term + bank depositor account teller ) #} fields('cust_pay') } ); @@ -57,6 +60,6 @@ push @rights, 'Post cash payment' if $new->payby eq 'CASH'; die "access denied" unless $FS::CurrentUser::CurrentUser->access_right(\@rights); -my $error = $new->insert( 'manual' => 1 ); +my $error ||= $new->insert( 'manual' => 1 ); </%init> |