solvergit: avoid "Wide character" warnings

[public-inbox.git] / lib / PublicInbox / SolverGit.pm

diff --git a/lib/PublicInbox/SolverGit.pm b/lib/PublicInbox/SolverGit.pm
index 891cde2087dbf55f6e6f738752c105f4dd94e027..1b1951b58e17a733f4396f258dcfac93abc0b7c0 100644 (file)
--- a/lib/PublicInbox/SolverGit.pm
+++ b/lib/PublicInbox/SolverGit.pm
@@ -125,6 +125,7 @@ sub extract_diff ($$$$$) {
 
                        push @$hdr_lines, $l;
                        $di->{hdr_lines} = $hdr_lines;
+                       utf8::encode($_) for @$hdr_lines;
                        print $tmp @$hdr_lines or die "print(tmp): $!";
 
                        # for debugging/diagnostics:
@@ -153,6 +154,7 @@ sub extract_diff ($$$$$) {
                        $di->{path_b} = join('/', @b);
                        $hdr_lines = [ $l ];
                } elsif ($tmp) {
+                       utf8::encode($l);
                        print $tmp $l or die "print(tmp): $!";
                } elsif ($hdr_lines) {
                        push @$hdr_lines, $l;