projects
/
openssl.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Fix a bunch of gcc warnings in packettest.c
[openssl.git]
/
util
/
find-doc-nits
diff --git
a/util/find-doc-nits
b/util/find-doc-nits
index aaf3eeb4f0d9a91ef180adb3bb7dd16dda608c5d..860bb9958bd2d8b7d86e0b962009fa2e286d2923 100755
(executable)
--- a/
util/find-doc-nits
+++ b/
util/find-doc-nits
@@
-1,5
+1,5
@@
#! /usr/bin/env perl
#! /usr/bin/env perl
-# Copyright 2002-201
6
The OpenSSL Project Authors. All Rights Reserved.
+# Copyright 2002-201
8
The OpenSSL Project Authors. All Rights Reserved.
#
# Licensed under the OpenSSL license (the "License"). You may not use
# this file except in compliance with the License. You can obtain a copy
#
# Licensed under the OpenSSL license (the "License"). You may not use
# this file except in compliance with the License. You can obtain a copy
@@
-24,7
+24,6
@@
our($opt_h);
our($opt_l);
our($opt_n);
our($opt_p);
our($opt_l);
our($opt_n);
our($opt_p);
-our($opt_s);
our($opt_u);
our($opt_c);
our($opt_u);
our($opt_c);
@@
-35,7
+34,6
@@
Find small errors (nits) in documentation. Options:
-d Detailed list of undocumented (implies -u)
-l Print bogus links
-n Print nits in POD pages
-d Detailed list of undocumented (implies -u)
-l Print bogus links
-n Print nits in POD pages
- -s Also print missing sections in POD pages (implies -n)
-p Warn if non-public name documented (implies -n)
-u List undocumented functions
-h Print this help message
-p Warn if non-public name documented (implies -n)
-u List undocumented functions
-h Print this help message
@@
-217,7
+215,6
@@
sub check()
foreach ((@{$mandatory_sections{'*'}}, @{$mandatory_sections{$section}})) {
# Skip "return values" if not -s
foreach ((@{$mandatory_sections{'*'}}, @{$mandatory_sections{$section}})) {
# Skip "return values" if not -s
- next if $_ eq 'RETURN VALUES' and not $opt_s;
print "$id: missing $_ head1 section\n"
if $contents !~ /^=head1\s+${_}\s*$/m;
}
print "$id: missing $_ head1 section\n"
if $contents !~ /^=head1\s+${_}\s*$/m;
}
@@
-374,7
+371,7
@@
sub collectnames {
# then remove 'something'. Note that 'something'
# may contain POD codes as well...
(?:(?:[^\|]|<[^>]*>)*\|)?
# then remove 'something'. Note that 'something'
# may contain POD codes as well...
(?:(?:[^\|]|<[^>]*>)*\|)?
- # we're only interested in referen
s
es that have
+ # we're only interested in referen
c
es that have
# a one digit section number
([^\/>\(]+\(\d\))
/gx;
# a one digit section number
([^\/>\(]+\(\d\))
/gx;
@@
-474,13
+471,13
@@
sub checkflags() {
return $ok;
}
return $ok;
}
-getopts('cdln
s
phu');
+getopts('cdlnphu');
&help() if $opt_h;
&help() if $opt_h;
-$opt_n = 1 if $opt_
s or $opt_
p;
+$opt_n = 1 if $opt_p;
$opt_u = 1 if $opt_d;
$opt_u = 1 if $opt_d;
-die "Need one of -[cdln
s
pu] flags.\n"
+die "Need one of -[cdlnpu] flags.\n"
unless $opt_c or $opt_l or $opt_n or $opt_u;
if ( $opt_c ) {
unless $opt_c or $opt_l or $opt_n or $opt_u;
if ( $opt_c ) {