Преглед изворни кода

Added strikethru support to Mdparser

spesk1 пре 5 година
родитељ
комит
06b4768967
1 измењених фајлова са 3 додато и 0 уклоњено
  1. 3 0
      lib/Gsg/MdParse.pm

+ 3 - 0
lib/Gsg/MdParse.pm

@@ -92,6 +92,9 @@ sub render_readme($$) {
 		} elsif ( $line =~ m/(http.*)/ ) {
 			$line = link_line($line);
 			print $fh "$line<br>";
+		} elsif ( $line =~ m/^~~(.*)~~/ ) {
+			$line = "<s>$1</s>";
+			print $fh "$line<br>";
 		}
 		else {
 			print $fh "$line<br>";