diff options
| author | wiz <wiz> | 2013-03-06 22:21:36 +0000 |
|---|---|---|
| committer | wiz <wiz> | 2013-03-06 22:21:36 +0000 |
| commit | d90b8ec3e43995ef76bb1dd323aa2868a7089f90 (patch) | |
| tree | 42c83ddab98f11d6acf7f40f46007a0c84c49872 /textproc/mdoclint | |
| parent | cfaf855a73966775a5f8b537fbb1a69f9cb8f83a (diff) | |
| download | pkgsrc-d90b8ec3e43995ef76bb1dd323aa2868a7089f90.tar.gz | |
Fix some incorrect warnings about 'new sentence, new line'. Ride bump.
Diffstat (limited to 'textproc/mdoclint')
| -rwxr-xr-x | textproc/mdoclint/files/mdoclint | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/textproc/mdoclint/files/mdoclint b/textproc/mdoclint/files/mdoclint index d50fdc2bfca..a469fd2a960 100755 --- a/textproc/mdoclint/files/mdoclint +++ b/textproc/mdoclint/files/mdoclint @@ -1,7 +1,7 @@ #!@PERL5@ # # $OpenBSD: mdoclint,v 1.14 2009/04/13 12:40:05 espie Exp $ -# $NetBSD: mdoclint,v 1.24 2013/03/06 22:09:01 wiz Exp $ +# $NetBSD: mdoclint,v 1.25 2013/03/06 22:21:36 wiz Exp $ # # Copyright (c) 2001-2013 Thomas Klausner # All rights reserved. @@ -531,8 +531,10 @@ sub process_line $s->warning(".Nd ends with a dot: `$_'") if $opt_n; } - if (/\w\w\.\s+[A-Z]/o) { - $s->warning("new sentence, new line: `$_'") if $opt_p; + if (/(\w\w)\.\s+[A-Z]/o and not /^.%T/ and not $s->{inliteral}) { + if ("$1" ne "St") { + $s->warning("new sentence, new line: `$_'") if $opt_p; + } } if (/^\... .*[^\s][\.();,\[\]\{\}:]$/o and not /\s\.\.\.$/o and not /\\&.$/o) { |