Changeset 623


Ignore:
Timestamp:
10/08/14 12:54:56 (10 years ago)
Author:
Kris Deugau
Message:

/trunk

Convert main.cgi's sole direct RPC call to use IPDB::_rpc()

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/cgi-bin/main.cgi

    r591 r623  
    104104  # Retrieve the list of DNS locations if we've got a place to grab them from
    105105  if ($IPDB::rpc_url) {
    106     # Make an object to represent the XML-RPC server.
    107     my $server = Frontier::Client->new(url => $IPDB::rpc_url, debug => 0);
    108     my $result;
    109106
    110107    my %rpcargs = (
    111108        rpcuser => $authuser,
    112         rpcsystem => 'ipdb',
    113109        group => 1,     # bleh
    114110        defloc => '',
    115111        );
    116     $result = $server->call('dnsdb.getLocDropdown', %rpcargs);
     112    my $result = IPDB::_rpc('getLocDropdown', %rpcargs);
    117113    $page->param(loclist => $result);
    118114  }
Note: See TracChangeset for help on using the changeset viewer.