utf encoding for another output file
authorEugene Crosser <crosser@average.org>
Thu, 8 Jan 2009 10:23:18 +0000 (10:23 +0000)
committerEugene Crosser <crosser@average.org>
Thu, 8 Jan 2009 10:23:18 +0000 (10:23 +0000)
mkgallery.pl

index 1031da6949dfab9397931ccfc0adfa993dfa33b5..747cb6c6c7187708fe5e94c2978c9144e78676cc 100755 (executable)
@@ -599,6 +599,7 @@ sub makeaux {
                        warn "cannot open \"$fn\": $!";
                        return;
                }
+               binmode($F, ":utf8");
                my $imgsrc = sprintf("../.%s/%s",$sizes[0],$name);
                print $F start_html(-title=>$title,
                                -encoding=>"utf-8",