anchor.diff:            case GoogleAnalytics of
               #mt_google_analytics{account = GaAccount, host = GaHost} ->
                 {GaAccount, GaHost};
  +            _ when is_record(GAPretend, mt_google_analytics) ->
  +              #mt_google_analytics{account = GaAccount, host = GaHost} = GAPretend,
  +              {GaAccount, GaHost};
               _ ->
                 {undefined, undefined}
             end,
  
positive.code:           {YandexID} =
            case YandexMetrika of
              #mt_yandex_metrika{id = YmID} ->
                {YmID};
              _ ->
                {undefined}
  
negative.code:             [Tld, SiteName | [Rest]] -> Rest;
              _ -> []
            end,
            {GARecPretend, YMRecPretend} =
            case mtc_entry:sget(mt_person, ?a2b(UserName)) of
               #mt_person{google_analytics = GA, yandex_metrika = YM} ->
                   {GA, YM};
               _ ->
                   {undefined, undefined}
            end,
            {{UserName, list_to_binary(BlogNamePretend)}, GARecPretend, YMRecPretend};
          cname -> {list_to_binary(BlogNamePretend), undefined, undefined}
        end,
        case mtc_entry:sget(mt_cname, CnameKey) of
          #mt_cname{cname = CName, title = BlogTitle, owner = Owner, streams = Streams,
  