diff options
author | dakkar <dakkar@thenautilus.net> | 2014-12-28 17:55:17 +0000 |
---|---|---|
committer | dakkar <dakkar@thenautilus.net> | 2014-12-28 17:55:17 +0000 |
commit | c38481cb9f06bf85e29b7676370468d56cdc858a (patch) | |
tree | e5b868db19a85567f6f3f0896b157b1e80b06330 /lib/Net/Hawk/Utils.pm | |
parent | fix auth header parsing (diff) | |
download | net-hawk-c38481cb9f06bf85e29b7676370468d56cdc858a.tar.gz net-hawk-c38481cb9f06bf85e29b7676370468d56cdc858a.tar.bz2 net-hawk-c38481cb9f06bf85e29b7676370468d56cdc858a.zip |
everything ported to p6
Diffstat (limited to 'lib/Net/Hawk/Utils.pm')
-rw-r--r-- | lib/Net/Hawk/Utils.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/Net/Hawk/Utils.pm b/lib/Net/Hawk/Utils.pm index 76478df..bf81b10 100644 --- a/lib/Net/Hawk/Utils.pm +++ b/lib/Net/Hawk/Utils.pm @@ -53,7 +53,7 @@ package Net::Hawk::Utils { Net::Hawk::Errors::BadRequest.new( text => "Bad attribute value $value", value => $header, - ).throw unless $value ~~ m{^<[ \w !#$%&'()*+,\-./:;\<=\>?@\[\]^`{|}~ ]>+$}; + ).throw unless $value ~~ m{^<[ \w \ !#$%&'()*+,\-./:;\<=\>?@\[\]^`{|}~ ]>+$}; Net::Hawk::Errors::BadRequest.new( text => "Duplicate attribute $key", |