texi2pod: Make it output a single encoding string

Intermixing =encoding utf-8 in the file can confuse some pod2man
implementations.
This commit is contained in:
Luca Barbato 2014-09-01 01:30:44 +02:00
parent 4912b634b5
commit 94f084324e

View File

@ -327,13 +327,14 @@ $inf = pop @instack;
die "No filename or title\n" unless defined $fn && defined $tl;
# always use utf8
print "=encoding utf8\n\n";
$sects{NAME} = "$fn \- $tl\n";
$sects{FOOTNOTES} .= "=back\n" if exists $sects{FOOTNOTES};
unshift @sects_sequence, "NAME";
for $sect (@sects_sequence) {
# always use utf8
print "=encoding utf8\n";
if(exists $sects{$sect}) {
$head = $sect;
$head =~ s/SEEALSO/SEE ALSO/;