0
@@ -551,7 +551,9 @@
0
           (set bq (markdown_RunBlockGamut bq))
0
           (set bq (/^/m replaceWithString:"  " inString:bq))
0
           ; These leading spaces screw with <pre> content, so we need to fix that:
0
-          (set bq ((eregex -"(\s*<pre>.+?</pre>)" -"egsx") replaceWithString:((eregex -"^  " -"mg") replaceWithString:-"" inString:-"$1") inString:bq))
0
+          (((eregex -"(\s*<pre>.+?</pre>)" -"egsx") findAllInString:bq) each:
0
+           (do (m2) 
0
+               (bq replaceOccurrencesOfString:(m2 group) withString:((eregex -"^  " -"mg") replaceWithString:-"" inString:(m2 groupAtIndex:1)))))
0
           (str replaceOccurrencesOfString:(m group) withString:"<blockquote>\n#{bq}\n</blockquote>\n\n")))
0
      str)
0