treesummaryrefslogcommitdiff
path: root/gitweb
diff options
context:
space:
mode:
authorpatrick-scho2025-11-29 15:07:10 +0100
committerpatrick-scho2025-11-29 15:07:10 +0100
commit554ee2efd7d9669b64c548e696a2dc92342464c3 (patch)
tree6d226c4c376361a48e3016ecc05661621210ea80 /gitweb
parent1f60d1a884fac7e52c4a4d9a41aaf03064b4418c (diff)
downloadps-gitweb-554ee2efd7d9669b64c548e696a2dc92342464c3.tar.gz
ps-gitweb-554ee2efd7d9669b64c548e696a2dc92342464c3.zip
escape \s in double quotes
Diffstat (limited to 'gitweb')
-rwxr-xr-xgitweb/gitweb.perl2
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=")(.*?)"/) {