projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
make RADIUS groups available to shellcommands exports
[freeside.git]
/
httemplate
/
misc
/
cust_main-cancel.cgi
diff --git
a/httemplate/misc/cust_main-cancel.cgi
b/httemplate/misc/cust_main-cancel.cgi
index
526e128
..
257c338
100755
(executable)
--- a/
httemplate/misc/cust_main-cancel.cgi
+++ b/
httemplate/misc/cust_main-cancel.cgi
@@
-7,8
+7,8
@@
my $custnum = $1;
my $cust_main = qsearchs('cust_main', { 'custnum' => $custnum } );
my $cust_main = qsearchs('cust_main', { 'custnum' => $custnum } );
-my
$error
= $cust_main->cancel;
-eidiot(
$error) if $error
;
+my
@errors
= $cust_main->cancel;
+eidiot(
join(' / ', @errors)) if scalar(@errors)
;
#print $cgi->redirect($p. "view/cust_main.cgi?". $cust_main->custnum);
print $cgi->redirect($p);
#print $cgi->redirect($p. "view/cust_main.cgi?". $cust_main->custnum);
print $cgi->redirect($p);