Fix some man page typos
[oweals/openssl.git] / dev / release-aux / fix-title.pl
1 #! /usr/bin/perl
2
3 BEGIN { my $prev }
4 ($_ = $prev) =~ s|^( *)(.*)$|"$1" . '=' x length($2)|e
5     if m|==========|;
6 $prev = $_;