aboutsummaryrefslogtreecommitdiff
path: root/t
diff options
context:
space:
mode:
authordakkar <dakkar@thenautilus.net>2014-12-27 21:48:02 +0000
committerdakkar <dakkar@thenautilus.net>2014-12-27 21:48:02 +0000
commit11105db8ba8015a970b5dc02f241ce8c37087351 (patch)
tree09147fe985f16606035683ee33befd25b336ce77 /t
parentfix exception stringification (diff)
downloadnet-hawk-11105db8ba8015a970b5dc02f241ce8c37087351.tar.gz
net-hawk-11105db8ba8015a970b5dc02f241ce8c37087351.tar.bz2
net-hawk-11105db8ba8015a970b5dc02f241ce8c37087351.zip
more tests & fixes
Diffstat (limited to 't')
-rw-r--r--t/tests/Net/Hawk/Utils.t14
1 files changed, 11 insertions, 3 deletions
diff --git a/t/tests/Net/Hawk/Utils.t b/t/tests/Net/Hawk/Utils.t
index 126450e..7db7b1d 100644
--- a/t/tests/Net/Hawk/Utils.t
+++ b/t/tests/Net/Hawk/Utils.t
@@ -12,15 +12,23 @@ subtest {
subtest {
throws_like { parse_authorization_header(Str) },
Net::Hawk::Errors::UnAuthorized,
- text => 'no header';
+ text => rx:s/no header/;
throws_like { parse_authorization_header('bad') },
Net::Hawk::Errors::BadRequest,
- text => 'invalid header syntax';
+ text => rx:s/invalid header/;
throws_like { parse_authorization_header('hawk: bad') },
Net::Hawk::Errors::BadRequest,
- text => 'Bad header format';
+ text => rx:i:s/bad header/;
+
+ throws_like { parse_authorization_header('hawk: bad="a"') },
+ Net::Hawk::Errors::BadRequest,
+ text => rx:i:s/unknown attribute/;
+
+ throws_like { parse_authorization_header('hawk: id="a", id="b"') },
+ Net::Hawk::Errors::BadRequest,
+ text => rx:i:s/duplicate attribute/;
is_deeply( parse_authorization_header('hawk: id="1"'),
{ id => '1' },