From c1ebe94e40a66a092c2cd501eda1edb5ec216938 Mon Sep 17 00:00:00 2001
From: fiddlosopher <fiddlosopher@788f1e2b-df1e-0410-8736-df70ead52e1b>
Date: Tue, 19 Dec 2006 23:46:07 +0000
Subject: + Replaced 'comparing' combinator in markdown reader with 'compare'. 
  'comparing' is from Data.Ord, which is not available in GHC 6.4. + Added
 line break after </li> in HTML footnote output, for easier   inspection of
 the source.

git-svn-id: https://pandoc.googlecode.com/svn/trunk@245 788f1e2b-df1e-0410-8736-df70ead52e1b
---
 src/Text/Pandoc/Writers/HTML.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/Text/Pandoc/Writers/HTML.hs')

diff --git a/src/Text/Pandoc/Writers/HTML.hs b/src/Text/Pandoc/Writers/HTML.hs
index dadd45e39..f1bd0f8b5 100644
--- a/src/Text/Pandoc/Writers/HTML.hs
+++ b/src/Text/Pandoc/Writers/HTML.hs
@@ -142,7 +142,7 @@ blockToHtml options (Note ref lst) =
     let contents = (concatMap (blockToHtml options) lst) in
     "<li id=\"fn" ++ ref ++ "\">" ++ contents ++ " <a href=\"#fnref" ++ ref ++ 
     "\" class=\"footnoteBacklink\" title=\"Jump back to footnote " ++ ref ++ 
-    "\">&#8617;</a></li>" 
+    "\">&#8617;</a></li>\n" 
 blockToHtml options (Key _ _) = ""
 blockToHtml options (CodeBlock str) = "<pre><code>" ++ (codeStringToHtml str) ++ 
                                       "\n</code></pre>\n"
-- 
cgit v1.2.3