File tree Expand file tree Collapse file tree 2 files changed +4
-2
lines changed Expand file tree Collapse file tree 2 files changed +4
-2
lines changed Original file line number Diff line number Diff line change @@ -50,7 +50,7 @@ sub _split_header_words
50
50
push (@res , [@cur ]) if @cur ;
51
51
@cur = ();
52
52
}
53
- elsif (s / ^\s *;// || s / ^\s +// ) {
53
+ elsif (s / ^\s *;// || s / ^\s +// || s / ^= // ) {
54
54
# continue
55
55
}
56
56
else {
Original file line number Diff line number Diff line change @@ -28,7 +28,7 @@ my @s_tests = (
28
28
' basic; realm="\"foo\\\\ bar\""' ],
29
29
);
30
30
31
- plan tests => @s_tests + 3 ;
31
+ plan tests => @s_tests + 4 ;
32
32
33
33
for (@s_tests ) {
34
34
my ($arg , $expect ) = @$_ ;
@@ -44,3 +44,5 @@ note "# Extra tests\n";
44
44
is(join_header_words(" foo" => undef , " bar" => " baz" ), " foo; bar=baz" );
45
45
is(join_header_words(), " " );
46
46
is(join_header_words([]), " " );
47
+ # ignore bare =
48
+ is_deeply(split_header_words(" foo; =;bar=baz" ), [" foo" => undef , " bar" => " baz" ]);
You can’t perform that action at this time.
0 commit comments