aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/cow_http_hd.erl22
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())].