use strict;
use Frontier::Client;

# some helper functions for various XMLRPC calls

sub get_frontier_connection {
  my $host = shift || $ENV{XMLRPC_TEST_HOST} || 'localhost';

# optionally specify http/https in the param or env var
  if ($host !~ /^http/) {
    $host = 'http://' . $host;
  }

  my $s = new Frontier::Client(url => "$host/rpc/api");
}

1;
