diff options
Diffstat (limited to 'tests/nroff-scan.pl')
-rw-r--r-- | tests/nroff-scan.pl | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/tests/nroff-scan.pl b/tests/nroff-scan.pl index a70c16b86..393068cd3 100644 --- a/tests/nroff-scan.pl +++ b/tests/nroff-scan.pl @@ -64,7 +64,7 @@ sub file { my ($pre, $str, $post)=($1, $2, $3); if($post ne "P") { print STDERR "error: $f:$line: missing \\fP after $str\n"; - $errrors++; + $errors++; } if($str =~ /((libcurl|curl)([^ ]*))\(3\)/i) { my $man = "$1.3"; @@ -72,6 +72,10 @@ sub file { print STDERR "error: $f:$line: refering to non-existing man page $man\n"; $errors++; } + if($pre ne "I") { + print STDERR "error: $f:$line: use \\fI before $str\n"; + $errors++; + } } } if($l =~ /(curl([^ ]*)\(3\))/i) { @@ -97,4 +101,4 @@ foreach my $f (@f) { file($f); } - exit $errors?1:0; +exit $errors?1:0; |