@@ -26,8 +26,8 @@ toHtml :: String -> String
26toHtml markdown =
26toHtml markdown =
27 "<html>" ++
27 "<html>" ++
28 "<body>" ++
28 "<body>" ++
29− "<verbatim>" ++
29+ "<pre>" ++
30 markdown ++
30 markdown ++
31− "</verbatim>" ++
31+ "</pre>" ++
32 "</body>" ++
32 "</body>" ++