X-Git-Url: http://git.megacz.com/?p=wix.git;a=blobdiff_plain;f=src%2FHtml.lhs;fp=src%2FHtml.lhs;h=1989e64e03cc9bd225e75dfffc4a6a724eeeae31;hp=74259f77291880423ad1ab3b0e9e6bbfc7b53d10;hb=757259623cca7cd1114e52a12bc01fe424361255;hpb=e6b058675419bdc7fb164809807837eb5e49c7dd

diff --git a/src/Html.lhs b/src/Html.lhs
index 74259f7..1989e64 100644
--- a/src/Html.lhs
+++ b/src/Html.lhs
@@ -284,7 +284,8 @@ instance ToHtml Text where
  toHtml (GlyphText Sharp)         = "⋘"
  toHtml (GlyphText CheckMark)     = "✓"
  toHtml (GlyphText XMark)         = "✗"
- toHtml (GlyphText LeftArrow)            = "&#;"  -- FIXME
+ toHtml (GlyphText LeftArrow)            = "←"
+ toHtml (GlyphText RightArrow)           = "→"
  toHtml (GlyphText DoubleLeftArrow)      = "&#;"  -- FIXME
  toHtml (GlyphText DoubleRightArrow)     = "&#;"  -- FIXME
  toHtml (GlyphText DoubleLeftRightArrow) = "&#;"  -- FIXME