X-Git-Url: http://git.megacz.com/?p=wix.git;a=blobdiff_plain;f=src%2FHtml.lhs;h=74259f77291880423ad1ab3b0e9e6bbfc7b53d10;hp=16226959f93dbf4b175d3115332a4b04642a8290;hb=e6b058675419bdc7fb164809807837eb5e49c7dd;hpb=7e4ff0231500f70834bc9c65c83d7068254eee55

diff --git a/src/Html.lhs b/src/Html.lhs
index 1622695..74259f7 100644
--- a/src/Html.lhs
+++ b/src/Html.lhs
@@ -236,6 +236,8 @@ instance ToHtml Text where
  toHtml (Command "green" y)       = "<font color=green>"++(toHtml y)++"</font>"
  toHtml (Command "sc" y)          = "<sc>"++(toHtml y)++"</sc>"
  toHtml (Command "image" y)       = "<img src='"++(toHtml y)++"'/>"
+ toHtml (Command "imagec" y)      = "<center><img src='"++(toHtml y)++"'/></center>"
+ toHtml (Command "image2" y)      = "<img width=180px src='"++(toHtml y)++"'/>"
  toHtml (Command "image3" y)      = "<img width=200px src='"++(toHtml y)++"'/>"
  toHtml (Command "image4" y)      = "<center><img width=550px src='"++(toHtml y)++"'/></center>"
  toHtml (Command "warn" y)        = "\n<div class=warn>\n<table border=0 cellpadding=5px>\n"