diff options
| author | Christopher Burger <burgerc@freeside.biz> | 2019-06-14 21:38:46 -0400 |
|---|---|---|
| committer | Christopher Burger <burgerc@freeside.biz> | 2019-06-15 08:45:55 -0400 |
| commit | 3222ca52c49918bd0c2feabf710e6d417c407ae7 (patch) | |
| tree | eb3b06c577e5500d2d979da4dfd74d1af2d77edf /httemplate/view/svc_export/run_script.cgi | |
| parent | dbd31f8daf6dcb915584d3b901f502e8289195bb (diff) | |
RT# 83450 - added location to virtual ap and added script to force update of all virtual ap
Conflicts:
FS/FS/part_export/saisei.pm
Diffstat (limited to 'httemplate/view/svc_export/run_script.cgi')
| -rw-r--r-- | httemplate/view/svc_export/run_script.cgi | 10 |
1 files changed, 3 insertions, 7 deletions
diff --git a/httemplate/view/svc_export/run_script.cgi b/httemplate/view/svc_export/run_script.cgi index ba58bbdd7..f0524991b 100644 --- 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 $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; |