more tests & fixes

1 files changed, 3 insertions, 3 deletions

diff --git a/lib/Net/Hawk/Utils.pm b/lib/Net/Hawk/Utils.pm
index e0473a2..a476ac9 100644
--- a/lib/Net/Hawk/Utils.pm
+++ b/lib/Net/Hawk/Utils.pm
@@ -48,17 +48,17 @@ package Net::Hawk::Utils {
               Net::Hawk::Errors::BadRequest.new(
                 text => "Unknown attribute $key",
                 value => $header,
-              ) unless $valid_keys{$key} :exists;
+              ).throw unless $valid_keys{~$key} :exists;
 
               Net::Hawk::Errors::BadRequest.new(
                 text => "Bad attribute value $value",
                 value => $header,
-              ) unless $value ~~ m{^<[ \w !#$%&'()*+,\-./:;\<=\>?@\[\]^`{|}~ ]>+$};
+              ).throw unless $value ~~ m{^<[ \w !#$%&'()*+,\-./:;\<=\>?@\[\]^`{|}~ ]>+$};
 
               Net::Hawk::Errors::BadRequest.new(
                 text => "Duplicate attribute $key",
                 value => $header,
-              ) if %attributes{$key} :exists;
+              ).throw if %attributes{$key} :exists;
 
               %attributes{$key} = ~$value;
           }