diff options
Diffstat (limited to 'gitweb/gitweb.perl')
| -rwxr-xr-x | gitweb/gitweb.perl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gitweb/gitweb.perl b/gitweb/gitweb.perl index a1c838d..07e5359 100755 --- a/gitweb/gitweb.perl +++ b/gitweb/gitweb.perl @@ -7231,7 +7231,7 @@ sub get_markdown { my $thash = shift; my $rethtmlstr = ""; use open ":encoding(utf8)"; # needed to have utf8 survive through the shell pipe - my $cmd_markdownify = $GIT . " " . git_cmd() . " cat-file blob " . $thash . " | " . $PERL . " -e 'my \$str = do { local \$/; <STDIN> }; \$str =~ s/<!--.*?--\s*>//gs; print \$str;' | " . $MD . " |"; + my $cmd_markdownify = $GIT . " " . git_cmd() . " cat-file blob " . $thash . " | " . $PERL . " -e 'my \$str = do { local \$/; <STDIN> }; \$str =~ s/<!--.*?--\\s*>//gs; print \$str;' | " . $MD . " |"; open (FOO, $cmd_markdownify) or die_error(500, "Open git-cat-file blob '$thash' failed"); while (<FOO>) { if ($_ =~ /(<img[^>]src=")(.*?)"/) { |