From c2fff7f2d6c4776a4b8e2c39a6b964a9c7c175d1 Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Thu, 25 Mar 2004 15:45:10 +0000
Subject: [haddock @ 2004-03-25 15:45:10 by simonmar] Eliminate some
 unnecessary spaces in the HTML rendering

---
 src/Html.hs | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

(limited to 'src/Html.hs')

diff --git a/src/Html.hs b/src/Html.hs
index 81cbad93..995719c8 100644
--- a/src/Html.hs
+++ b/src/Html.hs
@@ -9,7 +9,7 @@
 -- Stability   :  experimental
 -- Portability :  portable
 --
--- $Id: Html.hs,v 1.3 2004/03/25 15:17:24 simonmar Exp $
+-- $Id: Html.hs,v 1.4 2004/03/25 15:45:10 simonmar Exp $
 --
 -- An Html combinator library
 --
@@ -1034,5 +1034,5 @@ renderTag x name0 markupAttrs0 n r
 
       showPair :: HtmlAttr -> String
       showPair (HtmlAttr tag0 val)
-              = tag0 ++ " = \"" ++ val  ++ "\""
+              = tag0 ++ "=\"" ++ val  ++ "\""
 
-- 
cgit v1.2.3