0
@@ -556,11 +556,11 @@
0
 (function markdown_FormParagraphs (str)
0
      (set str (/(\A\n+)|(\n+\z)/ replaceWithString:"" inString:str))
0
      (set paragraphs (/\n{2,}/ splitString:str))     
0
-     
0
      ; Wrap <p> tags
0
      (set paragraphs (paragraphs map:(do (paragraph)
0
                                          (unless ($g_html_blocks valueForKey:paragraph)
0
-                                                 (set paragraph (/^([ \t]*)/ replaceWithString:"<p>$1" inString:(markdown_RunSpanGamut paragraph)))
0
+                                                 
0
+                                                 (set paragraph (/^([ \t]*)/ replaceWithString:"<p>" inString:(markdown_RunSpanGamut paragraph)))
0
                                                  (paragraph appendString:"</p>"))
0
                                          paragraph)))     
0
      ; Unhashify HTML blocks
0
@@ -602,7 +602,7 @@
0
      ;; Convert tabs into 4 spaces
0
      (set str (markdown_Detab str))
0
      ;; Strip any lines consisting only of spaces and tabs.
0
-     (set str (/^[ \t]+$/ replaceWithString:"" inString:str)) 
0
+     (set str (/^[ \t]+$/m replaceWithString:"" inString:str)) 
0
      ;; Turn block-level HTML blocks into hash entries
0
      (set str (markdown_HashHTMLBlocks str))       
0
      ;; Strip link definitions, store in hashes.