diff options
Diffstat (limited to 'autodoc.pl')
| -rw-r--r-- | autodoc.pl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/autodoc.pl b/autodoc.pl index c2fdcd3698..e7e3d54ada 100644 --- a/autodoc.pl +++ b/autodoc.pl @@ -222,7 +222,7 @@ DOC: redo FUNC; } } else { - warn "$file:$line:$in"; + warn "No doc for $file:$line:$in"; } } } @@ -263,8 +263,8 @@ removed without notice.\n\n$docs" if $flags =~ /x/; # nothing } else { if ($flags =~ /n/) { # no args - warn("n flag without m") unless $flags =~ /m/; - warn("n flag but apparently has args") if @args; + warn("$file: $name: n flag without m") unless $flags =~ /m/; + warn("$file: $name: n flag but apparently has args") if @args; print $fh "\t$ret\t$name"; } else { # full usage my $n = "Perl_"x$p . $name; |