From 5957ec155f716b36c7f3cd776bc74318ff3cb523 Mon Sep 17 00:00:00 2001 From: adam Date: Wed, 28 Jan 2009 14:05:07 -0800 Subject: [PATCH 1/1] use nowrap on pre-blocks darcs-hash:20090128220507-5007d-5325067c2f8bd840f8256284a074b34f0de23bf3.gz --- src/Html.lhs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/Html.lhs b/src/Html.lhs index 7a61bd4..5784cb5 100644 --- a/src/Html.lhs +++ b/src/Html.lhs @@ -313,7 +313,7 @@ htmlEscapeChar '\'' = "'" htmlEscapeChar '\"' = """ htmlEscapeChar c = [c] -pre x = "\n
"++ (pre' x) ++ "\n
\n" +pre x = "\n
"++ (pre' x) ++ "\n
\n" where pre' (' ':b) = " "++(pre' b) pre' ('\n':b) = "
\n"++(pre' b) -- 1.7.10.4