anchor.diff:  -include_lib("eTodo/include/eTodo.hrl").
   -include_lib("inets/include/httpd.hrl").
   
  --define(DodgerBlue, "#1e90ff").
  +-define(DodgerBlue,    "#1e90ff").
  +-define(HdrOptions1, [{color, ?DodgerBlue}, {size, 3},
  +                      {face, "Impact, Charcoal, sans-serif"}]).
  +-define(HdrOptions2,  [{color, ?DodgerBlue}, {size, 3},
  +                       {face, "Impact, Charcoal, sans-serif"}]).
  +-define(MsgOptions1,  [{color, "Black"}, {size, 3},
  +                       {face, "Tahoma, Geneva, sans-serif"}]).
  +
  +-define(MsgOptions2,  [{color, "Red"}, {size, 3},
  +                       {face, "Tahoma, Geneva, sans-serif"}]).
   
   -define(ValidURLChars, "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz"
           "0123456789-._~:/?#[]@!$&'*+,;=`.").
  
positive.code:                         imgTag([{src, getRootDir() ++ "/Icons/" ++ Icon}])),
                    tdTag([{valign, "top"}, {width, "80"},
                           {align, "center"}, {bgcolor, "#e6f2ff"}],
                          fontTag([{color, ?DodgerBlue}], toStr(time(), time))),
                    tdTag([{valign, "top"}, {width, "100%"}, {bgcolor, "#e6f2ff"}],
                          fontTag([{color, "Blue"}], [Sender, UserList])),
                    tdTag([{width, "150"}], [])]),
                 trTag(
                   [tdTag(),
                    tdTag([{valign, "top"}, {align, center}, {bgcolor, "#e6f2ff"}],
                          imgTag([{src, Portrait}, {height, "45"}, {width, "45"}])),
                    tdTag([{bgcolor, "#e6f2ff"}], eMd2Html:convert(Text)), tdTag()])]),
       tableTag([{class, "msgReceived"}],
                [trTag(
                   [tdTag([{class, "msgImg"}],
  
negative.code:                  [tdTag([{valign, "top"}],
                          imgTag([{src, getRootDir() ++ "/Icons/etodoChat.png"}])),
                    tdTag([{valign, "top"}, {bgcolor, "#f5f5f5"}],
                          fontTag(?HdrOptions1,
                                  toStr(time(), time))),
                    tdTag([{valign, "top"}, {bgcolor, "#f5f5f5"}],
                          fontTag(?HdrOptions1,
                                  aTag([{href, UidStr}], "eTodo")))]),
                 trTag([tdTag(), tdTag([{bgcolor, "#f5f5f5"}], []),
                        tdTag([{bgcolor, "#f5f5f5"}],
                            fontTag(?MsgOptions1, eMd2Html:convert(Text)))])]),
       tableTag(
         [trTag(
            [tdTag([{class, "msgImg"}],
  