diff options
author | Richard Levitte <levitte@openssl.org> | 2016-05-21 20:50:48 +0200 |
---|---|---|
committer | Richard Levitte <levitte@openssl.org> | 2016-05-23 00:45:44 +0200 |
commit | e4860d531dc52d6616e133a4a68f268bf44e1501 (patch) | |
tree | 7c3748858512f43be21baef0f438dac4b7d202dc | |
parent | eae029244d09b185287da0e1dc60f6289c775b89 (diff) |
process_docs.pl: When starting to read a new head1 section, remove previous text
Reviewed-by: Rich Salz <rsalz@openssl.org>
-rw-r--r-- | util/process_docs.pl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/util/process_docs.pl b/util/process_docs.pl index eaa4964869..150e48bf08 100644 --- a/util/process_docs.pl +++ b/util/process_docs.pl @@ -91,9 +91,10 @@ foreach my $subdir (keys %{$options{subdir}}) { if (m|^head1=\s*(.*)|) { $podinfo{lastsect} = $1; $podinfo{lastsect} =~ s/\s+$//; + $podinfo{lastsecttext} = ""; } next if (m|^=| || m|^\s*$|); - $podinfo{lastsecttext} .= " "; + $podinfo{lastsecttext} .= " " if $podinfo{lastsecttext}; $podinfo{lastsecttext} .= $_; } close $pod_fh; |