summary |
shortlog |
log |
commit | commitdiff |
tree
raw |
patch |
inline | side by side (from parent 1:
c589b65)
And also replace an unnecessary substitution (s///) op with a
match (m//).
Fixes: 93a7b219d58aad86 ("public-inbox-netd: a multi-protocol superserver")
while (my ($k, $v) = each %tls_opt) {
my $l = $k;
$l =~ s!\A([^:]+)://!!;
while (my ($k, $v) = each %tls_opt) {
my $l = $k;
$l =~ s!\A([^:]+)://!!;
my $xn = $xnetd->{$l} // $xnetd->{''};
my $xn = $xnetd->{$l} // $xnetd->{''};
- if ($scheme =~ s!\A(?:https|imaps|nntps)!!) {
+ if ($scheme =~ m!\A(?:https|imaps|nntps)!) {
$post_accept{$l} = tls_start_cb($v, $xn->{post_accept});
} elsif ($xn->{tlsd}) { # STARTTLS, $k eq '' is OK
$xn->{tlsd}->{accept_tls} = $v;
$post_accept{$l} = tls_start_cb($v, $xn->{post_accept});
} elsif ($xn->{tlsd}) { # STARTTLS, $k eq '' is OK
$xn->{tlsd}->{accept_tls} = $v;