From b85f601bdcfc50fd6223048f3c07ba29cbd56346 Mon Sep 17 00:00:00 2001 From: franck cuny Date: Fri, 4 Dec 2009 09:52:26 +0100 Subject: small updates to tests --- t/00_compile.t | 4 ++-- t/01_basic.t | 3 +++ t/10_mx_net_api_test.t | 43 +++++++++++++++++++++++++++++++++++++++++++ 3 files changed, 48 insertions(+), 2 deletions(-) create mode 100644 t/10_mx_net_api_test.t diff --git a/t/00_compile.t b/t/00_compile.t index 86438a0..10b03a4 100644 --- a/t/00_compile.t +++ b/t/00_compile.t @@ -1,4 +1,4 @@ use strict; -use Test::More tests => 1; +use Test::More tests => 2; -BEGIN { use_ok 'MooseX::Net::API' } +BEGIN { use_ok 'MooseX::Net::API'; use_ok 'MooseX::Net::API::Test' } diff --git a/t/01_basic.t b/t/01_basic.t index 9c108d2..471f3dd 100644 --- a/t/01_basic.t +++ b/t/01_basic.t @@ -29,4 +29,7 @@ throws_ok { } qr/foo is not declared as a param/, "... check declared params"; +ok my @methods = $obj->meta->local_api_methods(), '... get api methods'; +is scalar @methods, 3, '... got 3 methods in our API'; + done_testing; diff --git a/t/10_mx_net_api_test.t b/t/10_mx_net_api_test.t new file mode 100644 index 0000000..96bf2be --- /dev/null +++ b/t/10_mx_net_api_test.t @@ -0,0 +1,43 @@ +use strict; +use warnings; +use Test::More; + +BEGIN { + plan skip_all => 'requires Catalyst::Action::REST' + unless eval { require Catalyst::Action::REST }; +} + +{ + + package catalysttestapi; + use Moose; + use MooseX::Net::API::Test; + + test_api_declare 'TestAPI' => ( + catalyst => 1, + catalyst_app_name => 'TestApp' + ); + + test_api_method foo => ( + tests => { + simple => [ + { + # pouvoir surcharger + test => 'is_deeply', + expected => { status => 1 } + }, + 'ok', + ] + } + ); +} + +#content_like => [ { expected => qr/status: 1/ }, ], +#action_ok => [], +#action_redirect => [], +#action_notfound => [], +#contenttype_is => [], + +catalysttestapi->run(); + +done_testing; -- cgit 1.4.1