diff options
author | Jelmer Vernooij <jelmer@samba.org> | 2009-05-01 22:58:39 +0200 |
---|---|---|
committer | Jelmer Vernooij <jelmer@samba.org> | 2009-05-01 22:58:39 +0200 |
commit | 78bfc602888816f73ede757af44935b6fc08fc89 (patch) | |
tree | 1a1aee0216065d291aecf9b4e41b7076ae546346 | |
parent | cc6a5d57ea9016b8881d5c1e49e56267b1e9c951 (diff) | |
download | samba-78bfc602888816f73ede757af44935b6fc08fc89.tar.gz samba-78bfc602888816f73ede757af44935b6fc08fc89.tar.bz2 samba-78bfc602888816f73ede757af44935b6fc08fc89.zip |
find_unused_doc: Strip spaces in configuration names, just like the parser does.
-rwxr-xr-x | docs-xml/scripts/find_missing_doc.pl | 13 |
1 files changed, 9 insertions, 4 deletions
diff --git a/docs-xml/scripts/find_missing_doc.pl b/docs-xml/scripts/find_missing_doc.pl index 4379d3a476..3d0c345a5d 100755 --- a/docs-xml/scripts/find_missing_doc.pl +++ b/docs-xml/scripts/find_missing_doc.pl @@ -15,7 +15,9 @@ open(IN,"xsltproc --xinclude --param smb.context ALL generate-context.xsl parame while(<IN>) { if( /<samba:parameter .*?name="([^"]*?)"/g ){ - $doc{$1} = "NOTFOUND"; + my $name = $1; + $name =~ s/ //g; + $doc{$name} = "NOTFOUND"; } } @@ -39,10 +41,13 @@ while ($ln = <SOURCE>) { next if $ln =~ m/.*P_SEPARATOR.*/; next unless $ln =~ /\s*\.label\s*=\s*\"(.*)\".*/; - if($doc{lc($1)}) { - $doc{lc($1)} = "FOUND"; + my $name = $1; + $name =~ s/ //g; + + if($doc{lc($name)}) { + $doc{lc($name)} = "FOUND"; } else { - print "'$1' is not documented\n"; + print "'$name' is not documented\n"; } } close SOURCE; |