From fa5d437b3f4ea6f98944e541e9640673d158b9cd Mon Sep 17 00:00:00 2001
From: Karl Williamson <khw@cpan.org>
Date: Wed, 11 May 2022 10:07:01 -0600
Subject: perlapi: Don't indent table of undocumenteds

There's really no need to do this esthetically, and it gets us close to
fitting an extra column in a standard terminal width to shorten the table.
Future commits will gain that column.
---
 autodoc.pl | 12 +++++-------
 1 file changed, 5 insertions(+), 7 deletions(-)

(limited to 'autodoc.pl')

diff --git a/autodoc.pl b/autodoc.pl
index 7860cceb2a..3dd34213b3 100644
--- a/autodoc.pl
+++ b/autodoc.pl
@@ -69,10 +69,10 @@ my %extra_input_pods = ( 'dist/ExtUtils-ParseXS/lib/perlxs.pod' => 1 );
 use strict;
 use warnings;
 
-# 80 column terminal - 2 for pager adding 2 columns; -4 for indent for
-# non-heading lines;
-my $standard_indent = 4;  # for for non-heading lines;
-my $max_width = 80 - 2 - $standard_indent;
+my $nroff_min_indent = 4;   # for non-heading lines
+# 80 column terminal - 2 for pager adding 2 columns;
+my $max_width = 80 - 2 - $nroff_min_indent;
+my $standard_indent = 4;  # Any additional indentations
 
 if (@ARGV) {
     my $workdir = shift;
@@ -1615,7 +1615,7 @@ sub construct_missings_section {
     # required to list the elements.  @col_widths contains the width of each
     # column.
 
-    $text .= "\n\n=over $description_indent\n\n";
+    $text .= "\n";
 
     # Assemble the output
     for my $row (0 .. $rows - 1) {
@@ -1638,8 +1638,6 @@ sub construct_missings_section {
         $text .= "\n";  # End of row
     }
 
-    $text .= "\n=back\n";
-
     return $text;
 }
 
-- 
cgit v1.2.1