projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Remove remaining calls to idiot/eidiot. Should fix 1479
[freeside.git]
/
httemplate
/
misc
/
process
/
link.cgi
diff --git
a/httemplate/misc/process/link.cgi
b/httemplate/misc/process/link.cgi
index
fd3d8bb
..
66f4ee1
100755
(executable)
--- a/
httemplate/misc/process/link.cgi
+++ b/
httemplate/misc/process/link.cgi
@@
-39,7
+39,7
@@
%
% my $svc_x = $svc_x[0];
%
%
% my $svc_x = $svc_x[0];
%
-% e
idiot
("$link_field not found!") unless $svc_x;
+% e
rrorpage
("$link_field not found!") unless $svc_x;
%
% $svcnum = $svc_x->svcnum;
%
%
% $svcnum = $svc_x->svcnum;
%
@@
-52,11
+52,9
@@
%if ( $old->pkgnum && ! $conf->exists('legacy_link-steal') ) {
% $error = "svcnum $svcnum already linked to package ". $old->pkgnum;
%} else {
%if ( $old->pkgnum && ! $conf->exists('legacy_link-steal') ) {
% $error = "svcnum $svcnum already linked to package ". $old->pkgnum;
%} else {
-% $new = new FS::cust_svc ({
-% 'svcnum' => $svcnum,
-% 'pkgnum' => $pkgnum,
-% 'svcpart' => $svcpart,
-% });
+% $new = new FS::cust_svc { $old->hash };
+% $new->pkgnum($pkgnum);
+% $new->svcpart($svcpart);
%
% $error = $new->replace($old);
%}
%
% $error = $new->replace($old);
%}
@@
-71,7
+69,7
@@
<!-- mason kludge -->
%
<!-- mason kludge -->
%
-%
idiot
($error);
+%
errorpage
($error);
%}
%
%
%}
%
%