rename APIClient to ApiClient

This commit is contained in:
wing328
2015-05-28 10:51:36 +08:00
parent 2c12312b97
commit 1a868abdfa
11 changed files with 14 additions and 18 deletions

View File

@@ -1,4 +1,4 @@
package WWW::SwaggerClient::APIClient;
package WWW::SwaggerClient::ApiClient;
use strict;
use warnings;

View File

@@ -7,8 +7,6 @@ use utf8;
use Log::Any qw($log);
use Carp;
use WWW::SwaggerClient::APIClient;
# class/static variables
our $api_client;
our $http_timeout = 180;

View File

@@ -27,7 +27,7 @@ use Exporter;
use Carp qw( croak );
use Log::Any qw($log);
use WWW::SwaggerClient::APIClient;
use WWW::SwaggerClient::ApiClient;
use WWW::SwaggerClient::Configuration;
our @EXPORT_OK = qw(
@@ -44,7 +44,7 @@ our @EXPORT_OK = qw(
sub new {
my $class = shift;
my $default_api_client = $WWW::SwaggerClient::Configuration::api_client ? $WWW::SwaggerClient::Configuration::api_client : WWW::SwaggerClient::APIClient->new;
my $default_api_client = $WWW::SwaggerClient::Configuration::api_client ? $WWW::SwaggerClient::Configuration::api_client : WWW::SwaggerClient::ApiClient->new;
my (%self) = (
'api_client' => $default_api_client,
@_

View File

@@ -27,7 +27,7 @@ use Exporter;
use Carp qw( croak );
use Log::Any qw($log);
use WWW::SwaggerClient::APIClient;
use WWW::SwaggerClient::ApiClient;
use WWW::SwaggerClient::Configuration;
our @EXPORT_OK = qw(
@@ -40,7 +40,7 @@ our @EXPORT_OK = qw(
sub new {
my $class = shift;
my $default_api_client = $WWW::SwaggerClient::Configuration::api_client ? $WWW::SwaggerClient::Configuration::api_client : WWW::SwaggerClient::APIClient->new;
my $default_api_client = $WWW::SwaggerClient::Configuration::api_client ? $WWW::SwaggerClient::Configuration::api_client : WWW::SwaggerClient::ApiClient->new;
my (%self) = (
'api_client' => $default_api_client,
@_

View File

@@ -27,7 +27,7 @@ use Exporter;
use Carp qw( croak );
use Log::Any qw($log);
use WWW::SwaggerClient::APIClient;
use WWW::SwaggerClient::ApiClient;
use WWW::SwaggerClient::Configuration;
our @EXPORT_OK = qw(
@@ -44,7 +44,7 @@ our @EXPORT_OK = qw(
sub new {
my $class = shift;
my $default_api_client = $WWW::SwaggerClient::Configuration::api_client ? $WWW::SwaggerClient::Configuration::api_client : WWW::SwaggerClient::APIClient->new;
my $default_api_client = $WWW::SwaggerClient::Configuration::api_client ? $WWW::SwaggerClient::Configuration::api_client : WWW::SwaggerClient::ApiClient->new;
my (%self) = (
'api_client' => $default_api_client,
@_