summaryrefslogtreecommitdiff
path: root/textproc/mdoclint/files
diff options
context:
space:
mode:
authorwiz <wiz>2013-03-06 22:09:01 +0000
committerwiz <wiz>2013-03-06 22:09:01 +0000
commitcfaf855a73966775a5f8b537fbb1a69f9cb8f83a (patch)
tree20e40cba69c3333d7405c715a61a02263af379d0 /textproc/mdoclint/files
parentaf0d098ab6d302e2765c3da7152dc000f54e92c5 (diff)
downloadpkgsrc-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-xtextproc/mdoclint/files/mdoclint4
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;
}