summary refs log tree commit diff
path: root/t/05_authentication.t
diff options
context:
space:
mode:
Diffstat (limited to 't/05_authentication.t')
-rw-r--r--t/05_authentication.t67
1 files changed, 0 insertions, 67 deletions
diff --git a/t/05_authentication.t b/t/05_authentication.t
deleted file mode 100644
index e769a53..0000000
--- a/t/05_authentication.t
+++ /dev/null
@@ -1,67 +0,0 @@
-use strict;
-use warnings;
-use Test::More;
-
-package test::auth;
-use MooseX::Net::API;
-
-net_api_declare fake_auth => (
-    api_base_url          => 'http://localhost',
-    format                => 'json',
-    authentication        => 1,
-    authentication_method => 'my_auth',
-);
-
-net_api_method user => (
-    method => 'GET',
-    path   => '/user/',
-);
-
-sub my_auth {
-    my ($self, $request, $ua, $h) = @_;
-    $request->header('Authentication' => 1);
-}
-
-package test::auth::simple;
-use MooseX::Net::API;
-
-net_api_declare fake_auth => (
-    api_base_url          => 'http://localhost',
-    format                => 'json',
-    authentication        => 1,
-);
-
-net_api_method user => (
-    method => 'GET',
-    path   => '/user/',
-);
-
-package main;
-
-ok my $api = test::auth->new, 'object api created';
-$api->api_useragent->add_handler(
-    request_send => sub {
-        my $request = shift;
-        is $request->header('Authentication'), 1, 'authentication header is set';
-        my $res = HTTP::Response->new(200);
-        $res->content('[{"name":"eris"}]');
-        $res;
-    }
-);
-ok $api->user, 'method user success';
-
-ok $api =
-  test::auth::simple->new(api_username => 'foo', api_password => 'bar'),
-  'object api simple created';
-$api->api_useragent->add_handler(
-    request_send => sub {
-        my $request = shift;
-        ok $request->header('authorization'), 'authentication header is set';
-        my $res = HTTP::Response->new(200);
-        $res->content('[{"name":"eris"}]');
-        $res;
-    }
-);
-ok $api->user, 'method user success';
-
-done_testing;