diff options
| author | franck cuny <franck@lumberjaph.net> | 2010-08-31 15:45:25 +0200 |
|---|---|---|
| committer | franck cuny <franck@lumberjaph.net> | 2010-08-31 15:45:25 +0200 |
| commit | 3579912d0fbf05fc0a945ef3c7b08497b0aabe4e (patch) | |
| tree | a56642c0abd42361dc039c95316d48a15d4d831e /t/01_basic.t | |
| parent | s/load/new/ (diff) | |
| download | net-http-api-spec-3579912d0fbf05fc0a945ef3c7b08497b0aabe4e.tar.gz | |
check path for file
Diffstat (limited to '')
| -rw-r--r-- | t/01_basic.t | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/t/01_basic.t b/t/01_basic.t index 64983c1..5f1c9b9 100644 --- a/t/01_basic.t +++ b/t/01_basic.t @@ -1,11 +1,18 @@ use strict; use warnings; use Test::More; +use Test::Exception; use Net::HTTP::API::Spec; ok my $client = Net::HTTP::API::Spec->new_from_spec('t/spec/test1.json'); +dies_ok { + $client = Net::HTTP::API::Spec->new_from_spec('foobarbaz'); +}; + +like $@, qr/does not exists/; + my @methods = $client->meta->get_all_net_api_methods(); is scalar @methods, 2; |