diff options
author | wiz <wiz@pkgsrc.org> | 2013-03-06 22:09:01 +0000 |
---|---|---|
committer | wiz <wiz@pkgsrc.org> | 2013-03-06 22:09:01 +0000 |
commit | b373a476ba9dc8718c071b0f87686489e5e05aab (patch) | |
tree | 20e40cba69c3333d7405c715a61a02263af379d0 /textproc | |
parent | 39de5c857dd5f6a9aacbbab94738a49c7b8f7505 (diff) | |
download | pkgsrc-b373a476ba9dc8718c071b0f87686489e5e05aab.tar.gz |
Do not warn about () in literal strings or when used as macro argument.
Ride bump.
Diffstat (limited to 'textproc')
-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; } |