gitweb: Output valid utf8 in git_blame_common('data')

[Gitweb] / gitweb.perl

diff --git a/gitweb.perl b/gitweb.perl
index 67b41e584f3120409e2cae97849549cf95caaa95c8d7dae3bf675aed05364389..0dbca9d055cf5f67cba476952780d4cd05f0e1d0b96efd080751cd1f1462f179 100755 (executable)
--- a/gitweb.perl
+++ b/gitweb.perl
@@ -6245,7 +6245,9 @@ sub git_blame_common {
                        -type=>"text/plain", -charset => "utf-8",
                        -status=> "200 OK");
                local $| = 1; # output autoflush
-               print while <$fd>;
+               while (my $line = <$fd>) {
+                       print to_utf8($line);
+               }
                close $fd
                        or print "ERROR $!\n";