Revision 84f80318
Von Moritz Bunkus vor etwa 9 Jahren hinzugefügt
| modules/override/Text/MultiMarkdown.pm | ||
|---|---|---|
|
)
|
||
|
```(?:\n|\Z)
|
||
|
}{
|
||
|
my $codeblock = $1;
|
||
|
my $result; # return value
|
||
|
my $spaces = ' ' x $self->{tab_width};
|
||
|
my $codeblock = $1;
|
||
|
$codeblock =~ s{^}{$spaces}mg;
|
||
|
|
||
|
$codeblock = $self->_EncodeCode($codeblock);
|
||
|
$codeblock = $self->_Detab($codeblock);
|
||
|
$codeblock =~ s/\A\n+//; # trim leading newlines
|
||
|
$codeblock =~ s/\n+\z//; # trim trailing newlines
|
||
|
|
||
|
$result = "\n\n<pre><code>" . $codeblock . "\n</code></pre>\n\n";
|
||
|
|
||
|
$result;
|
||
|
$codeblock;
|
||
|
}egmsx;
|
||
|
|
||
|
return $text;
|
||
Auch abrufbar als: Unified diff
MultiMarkdown: Bugfix für ```-Blöcke: deren Inhalt darf nicht interpretiert werden