anchor.diff:                              iStyle := iStyle + [fsStrikeOut]
                             else if Props[TextDecoration] = 'none' then
                               iStyle := iStyle - [fsStrikeOut, fsUnderline];
  -                            
  +
                           LetterSpacing:
                             iCharExtra := Props[LetterSpacing];
                         end;
  
positive.code: 
    // in the following, lowest priority on top, highest towards bottom.
  
      if (Tag = 'a') and (Pseudo <> '') then
        MergeItems('::' + Pseudo); {default Pseudo definition}
  
      if NoHoverVisited then
  
negative.code: 
      if AProp <> nil then //the Style= attribute
        Merge(AProp);
  
      if (Tag = 'a') and not ((Pseudo = 'hover') or (Pseudo = 'active')) then
        // BG, 02.02.2013: github-issue 25: Multiple pseudo elements can apply
        // Just assign defaults for what is still unassigned:
        MergeItems('::' + Pseudo, True); {default Pseudo definition}
  
      if not (VarType(Props[FontSize]) in varNum) then {if still a ThtString, hasn't been converted}
        Props[FontSize] := FontSizeConv(Props[FontSize], OldSize, FUseQuirksMode);
  