Consistent spaces after dots in perlintern.pod

[perl5.git] / autodoc.pl

diff --git a/autodoc.pl b/autodoc.pl
index f82593e..bd06803 100644 (file)
--- a/autodoc.pl
+++ b/autodoc.pl
@@ -13,8 +13,7 @@
 # Has an optional arg, which is the directory to chdir to before reading
 # MANIFEST and *.[ch].
 #
-# This script is normally invoked as part of 'make all', but is also
-# called from regen.pl.
+# This script is invoked as part of 'make all'
 #
 # '=head1' are the only headings looked for.  If the next line after the
 # heading begins with a word character, it is considered to be the first line
@@ -254,7 +253,7 @@ sub output {
     my ($podname, $header, $dochash, $missing, $footer) = @_;
     my $fh = open_new("pod/$podname.pod", undef,
                      {by => "$0 extracting documentation",
-                      from => 'the C source files'});
+                       from => 'the C source files'}, 1);
 
     print $fh $header;
 
@@ -283,13 +282,14 @@ sub output {
         print $fh "\n=head1 Undocumented functions\n\n";
     print $fh $podname eq 'perlapi' ? <<'_EOB_' : <<'_EOB_';
 The following functions have been flagged as part of the public API,
-but are currently undocumented. Use them at your own risk, as the
+but are currently undocumented.  Use them at your own risk, as the
 interfaces are subject to change.  Functions that are not listed in this
 document are not intended for public use, and should NOT be used under any
 circumstances.
 
 If you use one of the undocumented functions below, you may wish to consider
-creating and submitting documentation for it. If your patch is accepted, this
+creating and submitting documentation
+for it.  If your patch is accepted, this
 will indicate that the interface is stable (unless it is explicitly marked
 otherwise).
 
@@ -437,7 +437,7 @@ X<internal Perl functions> X<interpreter functions>
 
 This file is the autogenerated documentation of functions in the
 Perl interpreter that are documented using Perl's internal documentation
-format but are not marked as part of the Perl API. In other words,
+format but are not marked as part of the Perl API.  In other words,
 B<they are not for use in extensions>!
 
 END
@@ -445,7 +445,7 @@ END
 =head1 AUTHORS
 
 The autodocumentation system was originally added to the Perl core by
-Benjamin Stuhl. Documentation is by whoever was kind enough to
+Benjamin Stuhl.  Documentation is by whoever was kind enough to
 document their functions.
 
 =head1 SEE ALSO