diff options
author | wiz <wiz> | 2013-03-06 22:09:01 +0000 |
---|---|---|
committer | wiz <wiz> | 2013-03-06 22:09:01 +0000 |
commit | cfaf855a73966775a5f8b537fbb1a69f9cb8f83a (patch) | |
tree | 20e40cba69c3333d7405c715a61a02263af379d0 /textproc/mdoclint/files | |
parent | af0d098ab6d302e2765c3da7152dc000f54e92c5 (diff) | |
download | pkgsrc-cfaf855a73966775a5f8b537fbb1a69f9cb8f83a.tar.gz |
Do not warn about () in literal strings or when used as macro argument.
Ride bump.
Diffstat (limited to 'textproc/mdoclint/files')
-rwxr-xr-x | textproc/mdoclint/files/mdoclint | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/textproc/mdoclint/files/mdoclint b/textproc/mdoclint/files/mdoclint index 23a6e3f404f..d50fdc2bfca 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.23 2013/03/06 21:43:43 wiz Exp $ +# $NetBSD: mdoclint,v 1.24 2013/03/06 22:09:01 wiz Exp $ # # Copyright (c) 2001-2013 Thomas Klausner # All rights reserved. @@ -542,7 +542,7 @@ sub process_line if (/^\./o and /Ns [\.();,\[\]\{\}:]/o) { $s->warning("possible Ns abuse: `$_'") if $opt_p; } - if (/(\w+)\(\)/o) { + if ((/^([^\.]\w+)\(\)/o or /^[^\.].*\s(\w+)\(\)/o) and not $s->{inliteral}) { $s->warning("use .Fn or .Xr for functions: `$1()'") if $opt_p; } |