projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
RT# 83450 - added location to virtual ap and added script to force update of all...
[freeside.git]
/
httemplate
/
view
/
svc_export
/
run_script.cgi
diff --git
a/httemplate/view/svc_export/run_script.cgi
b/httemplate/view/svc_export/run_script.cgi
index
ba58bbd
..
f052499
100644
(file)
--- a/
httemplate/view/svc_export/run_script.cgi
+++ b/
httemplate/view/svc_export/run_script.cgi
@@
-14,17
+14,13
@@
my %param = ();
}
}
}
}
-my $exportnum;
-my $method;
-for (grep /^*_script$/, keys %param) {
- $exportnum = $param{$param{$_}.'_exportnum'};
- $method = $param{$param{$_}.'_script'};
-}
+my $run_script = $param{'key'};
+my $exportnum = $param{$run_script.'_exportnum'};
my $part_export = qsearchs('part_export', { 'exportnum'=> $exportnum, } )
or die "unknown exportnum $exportnum";
my $part_export = qsearchs('part_export', { 'exportnum'=> $exportnum, } )
or die "unknown exportnum $exportnum";
-my $class = 'FS::part_export::'.$part_export->{Hash}->{exporttype}.'::'.$
method
;
+my $class = 'FS::part_export::'.$part_export->{Hash}->{exporttype}.'::'.$
run_script
;
my $server = new FS::UI::Web::JSRPC $class, $cgi;
my $server = new FS::UI::Web::JSRPC $class, $cgi;