X-Git-Url: http://git.cielonegro.org/gitweb.cgi?p=Rakka.git;a=blobdiff_plain;f=Rakka%2FWiki%2FEngine.hs;h=eb986ea0b46c23a36d6acdc336a7ac3abda516ab;hp=ffaab2f4edf28a9a41b19be39b223be3999d4e8f;hb=4e8a07033b0b0ea0961bffb3bab0b6fc9c21afba;hpb=0b1235464affca4fb349c713278d2e37fd8e9584

diff --git a/Rakka/Wiki/Engine.hs b/Rakka/Wiki/Engine.hs
index ffaab2f..eb986ea 100644
--- a/Rakka/Wiki/Engine.hs
+++ b/Rakka/Wiki/Engine.hs
@@ -132,4 +132,5 @@ everywhereM' f x = f x >>= gmapM (everywhereM' f)
 
 wikifyParseError :: ArrowXml a => a ParseError WikiPage
 wikifyParseError 
-    = proc err -> returnA -< [Preformatted [Text (show err)]]
+    = proc err -> returnA -< [Div [("class", "error")]
+                              [ Preformatted [Text (show err)] ]]