gitweb: Escape ESCAPE (\e) character

diff --git a/gitweb/gitweb.perl b/gitweb/gitweb.perl
index 44991b1538316b971884bafa5f8f01f678ec9a71..3e9d4a00524537c2f136bb9e98a19727cf21438a 100755 (executable)
--- a/gitweb/gitweb.perl
+++ b/gitweb/gitweb.perl
@@ -465,6 +465,7 @@ sub esc_html {
        $str = decode("utf8", $str, Encode::FB_DEFAULT);
        $str = escapeHTML($str);
        $str =~ s/\014/^L/g; # escape FORM FEED (FF) character (e.g. in COPYING file)
+       $str =~ s/\033/^[/g; # "escape" ESCAPE (\e) character (e.g. commit 20a3847d8a5032ce41f90dcc68abfb36e6fee9b1)
        return $str;
 }