utf encoding for another output file

[mkgallery.git] / mkgallery.pl

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