diff options
| author | simonmar <unknown> | 2004-03-25 15:45:10 +0000 |
|---|---|---|
| committer | simonmar <unknown> | 2004-03-25 15:45:10 +0000 |
| commit | c2fff7f2d6c4776a4b8e2c39a6b964a9c7c175d1 (patch) | |
| tree | 77a4c44f82a9145bfffd50b41f59e99974dcd64e | |
| parent | 9b64dc0f38c3540823fbf82c24d81464f742405d (diff) | |
[haddock @ 2004-03-25 15:45:10 by simonmar]
Eliminate some unnecessary spaces in the HTML rendering
| -rw-r--r-- | src/Html.hs | 4 |
1 files changed, 2 insertions, 2 deletions
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 ++ "\"" |