autodoc.pl: output to fit in 79 columns

diff --git a/autodoc.pl b/autodoc.pl
index 89b36df..186ebd2 100644 (file)
--- a/autodoc.pl
+++ b/autodoc.pl
@@ -197,7 +197,7 @@ removed without notice.\n\n" if $flags =~ /x/;
        print $fh "\t$ret" . ($large_ret ? ' ' : "\t") . "$n(";
        my $long_args;
        for (@args) {
-           if ($indent_size + 2 + length > 80) {
+           if ($indent_size + 2 + length > 79) {
                $long_args=1;
                $indent_size -= length($n) - 3;
                last;
@@ -213,7 +213,7 @@ removed without notice.\n\n" if $flags =~ /x/;
        while () {
            if (!@args or
                 length $args
-                && $indent_size + 3 + length($args[0]) + length $args > 80
+                && $indent_size + 3 + length($args[0]) + length $args > 79
            ) {
                print $fh
                  $first ? '' : (

diff --git a/t/porting/known_pod_issues.dat b/t/porting/known_pod_issues.dat
index bdd56a1..1ee620d 100644 (file)
--- a/t/porting/known_pod_issues.dat
+++ b/t/porting/known_pod_issues.dat
@@ -203,7 +203,7 @@ os2/os2/os2-rexx/rexx.pm    Verbatim line length including indents exceeds 79 by    1
 pod/perl.pod   Verbatim line length including indents exceeds 79 by    9
 pod/perlaix.pod        Verbatim line length including indents exceeds 79 by    11
 pod/perlapi.pod        ? Should you be using L<...> instead of 86
-pod/perlapi.pod        Verbatim line length including indents exceeds 79 by    24
+pod/perlapi.pod        Verbatim line length including indents exceeds 79 by    6
 pod/perlapi.pod        unresolved internal link        3
 pod/perlapio.pod       Verbatim line length including indents exceeds 79 by    5
 pod/perlbook.pod       Verbatim line length including indents exceeds 79 by    1
@@ -235,7 +235,6 @@ pod/perlhist.pod    Verbatim line length including indents exceeds 79 by    2
 pod/perlhpux.pod       Verbatim line length including indents exceeds 79 by    3
 pod/perlhurd.pod       Verbatim line length including indents exceeds 79 by    2
 pod/perlintern.pod     ? Should you be using L<...> instead of 5
-pod/perlintern.pod     Verbatim line length including indents exceeds 79 by    2
 pod/perlinterp.pod     ? Should you be using L<...> instead of 1
 pod/perlinterp.pod     Verbatim line length including indents exceeds 79 by    1
 pod/perlintro.pod      Verbatim line length including indents exceeds 79 by    11