1
0
mirror of https://github.com/moparisthebest/wget synced 2024-07-03 16:38:41 -04:00

Check for negated option names when extracting params.

This commit is contained in:
Steven Schubiger 2009-06-29 13:38:30 +02:00
parent c6b9113c61
commit 9b8cba8a12

View File

@ -250,8 +250,14 @@ sub emit_undocumented_opts
}
my @options;
foreach my $opt (@$opts) {
if (not $items{$opt->{long_name}} || $opt->{deprecated}) {
push @options, $opt->{long_name};
my $opt_name = $opt->{long_name};
if (not $items{$opt_name}
|| ($opt_name !~ /^no/
? $items{"no-$opt_name"}
: false)
|| $opt->{deprecated})
{
push @options, $opt_name;
}
}