texi2pod: Make it output a single encoding string
authorLuca Barbato <lu_zero@gentoo.org>
Sun, 31 Aug 2014 23:30:44 +0000 (01:30 +0200)
committerLuca Barbato <lu_zero@gentoo.org>
Wed, 3 Sep 2014 00:14:17 +0000 (02:14 +0200)
Intermixing =encoding utf-8 in the file can confuse some pod2man
implementations.

doc/texi2pod.pl

index 54d5717..e4eb61c 100755 (executable)
@@ -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/;