mirror of
https://github.com/curl/curl.git
synced 2026-07-28 08:33:05 +03:00
cd2nroff: handle TLS together with other protocols
To render CURLOPT_KEYPASSWD properly Closes #22123
This commit is contained in:
parent
0d6e5944bc
commit
cb7efe1c35
1 changed files with 20 additions and 14 deletions
|
|
@ -100,27 +100,33 @@ sub outprotocols {
|
|||
my (@p) = @_;
|
||||
my $comma = 0;
|
||||
my @o;
|
||||
my $tls = 0;
|
||||
push @o, ".SH PROTOCOLS\n";
|
||||
|
||||
if($p[0] eq "TLS") {
|
||||
push @o, "This functionality affects all TLS based protocols: HTTPS, FTPS, IMAPS, POP3S, SMTPS etc.";
|
||||
}
|
||||
else {
|
||||
my @s = sort @p;
|
||||
push @o, "This functionality affects ";
|
||||
for my $e (sort @s) {
|
||||
my @s = sort @p;
|
||||
push @o, "This functionality affects ";
|
||||
for my $e (sort @s) {
|
||||
if($e eq "TLS") {
|
||||
$tls = 1;
|
||||
}
|
||||
else {
|
||||
push @o, sprintf "%s%s",
|
||||
$comma ? (($e eq $s[-1]) ? " and " : ", "): "",
|
||||
lc($e);
|
||||
$comma = 1;
|
||||
}
|
||||
if($#s == 0) {
|
||||
if($s[0] eq "All") {
|
||||
push @o, " supported protocols";
|
||||
}
|
||||
else {
|
||||
push @o, " only";
|
||||
}
|
||||
}
|
||||
if($tls) {
|
||||
push @o, sprintf
|
||||
"%sall TLS based protocols: HTTPS, FTPS, IMAPS, POP3S, SMTPS etc.",
|
||||
$comma ? " and ": " ";
|
||||
}
|
||||
if($#s == 0) {
|
||||
if($s[0] eq "All") {
|
||||
push @o, " supported protocols";
|
||||
}
|
||||
else {
|
||||
push @o, " only";
|
||||
}
|
||||
}
|
||||
push @o, "\n";
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue