projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
wording
[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
a78a8b3
..
fcae671
100755
(executable)
--- a/
httemplate/misc/cust_main-cancel.cgi
+++ b/
httemplate/misc/cust_main-cancel.cgi
@@
-1,9
+1,4
@@
-<& /elements/header-popup.html, mt("Customer cancelled") &>
- <SCRIPT TYPE="text/javascript">
- window.top.location.reload();
- </SCRIPT>
- </BODY>
-</HTML>
+<& /elements/popup-topreload.html, mt("Customer cancelled") &>
<%init>
die "access denied"
<%init>
die "access denied"
@@
-54,10
+49,11
@@
if ( $error ) {
}
else {
warn "cancelling $cust_main";
}
else {
warn "cancelling $cust_main";
- $error = $cust_main->cancel(
+ my @error = $cust_main->cancel( #returns list of errors
'ban' => $ban,
'reason' => $reasonnum,
);
'ban' => $ban,
'reason' => $reasonnum,
);
+ $error = join(', ',@error);
}
if ( $error ) {
}
if ( $error ) {