diff options
Diffstat (limited to 'src')
-rw-r--r-- | src/cow_http_hd.erl | 22 |
1 files changed, 2 insertions, 20 deletions
diff --git a/src/cow_http_hd.erl b/src/cow_http_hd.erl index 5ff5274..8fe9f04 100644 --- a/src/cow_http_hd.erl +++ b/src/cow_http_hd.erl @@ -624,28 +624,10 @@ language_range_list_sep(<< $,, R/bits >>, Acc) -> language_range_list(R, Acc). -ifdef(TEST). language_range_tag() -> - oneof([ - [alpha()], - [alpha(), alpha()], - [alpha(), alpha(), alpha()], - [alpha(), alpha(), alpha(), alpha()], - [alpha(), alpha(), alpha(), alpha(), alpha()], - [alpha(), alpha(), alpha(), alpha(), alpha(), alpha()], - [alpha(), alpha(), alpha(), alpha(), alpha(), alpha(), alpha()], - [alpha(), alpha(), alpha(), alpha(), alpha(), alpha(), alpha(), alpha()] - ]). + vector(1, 8, alpha()). language_range_subtag() -> - [$-, oneof([ - [alphanum()], - [alphanum(), alphanum()], - [alphanum(), alphanum(), alphanum()], - [alphanum(), alphanum(), alphanum(), alphanum()], - [alphanum(), alphanum(), alphanum(), alphanum(), alphanum()], - [alphanum(), alphanum(), alphanum(), alphanum(), alphanum(), alphanum()], - [alphanum(), alphanum(), alphanum(), alphanum(), alphanum(), alphanum(), alphanum()], - [alphanum(), alphanum(), alphanum(), alphanum(), alphanum(), alphanum(), alphanum(), alphanum()] - ])]. + [$-, vector(1, 8, alphanum())]. language_range() -> [language_range_tag(), small_list(language_range_subtag())]. |