summaryrefslogtreecommitdiff
path: root/httemplate/view/svc_export/run_script.cgi
diff options
context:
space:
mode:
authorChristopher Burger <burgerc@freeside.biz>2019-06-14 21:38:46 -0400
committerChristopher Burger <burgerc@freeside.biz>2019-06-14 21:38:46 -0400
commitac3296dc4d9c1c7ff3646df6496a4f49d9e07b9b (patch)
tree4310ac8668adfdfeba3578f224f464692a5b80f5 /httemplate/view/svc_export/run_script.cgi
parent978a10cd56e76e763b15f21c533d507d5bc84dec (diff)
RT# 83450 - added location to virtual ap and added script to force update of all virtual ap
Diffstat (limited to 'httemplate/view/svc_export/run_script.cgi')
-rw-r--r--httemplate/view/svc_export/run_script.cgi10
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 ba58bbd..f052499 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;