anchor.diff:            "class=\"comment-anchor-link link\" "
             "target=\"_self\">" ++ "#"++binary_to_list(PostId)++"/"++Anchor ++ "</a>"
           },
  +        #link{body = comment_date(Comment), url = "#"++Anchor},
           #panel{class = "comment-body", body = Body}
         ]},
         #hidden{id="level-"++parents_to_path(PostId, Parents), text=Level},
         default_items(parents_to_path(PostId, Parents))
       ]}
     ].
  +
  +user_name_profile(UserName, RealName) ->
  +  UserProfileUrl = mtws_common:user_blog(UserName, ["/profile"]),
  +  #panel{class = "user-name", body = [
  +    #link{body = [
  +      #panel{class = "user-real-name", text = RealName},
  +      #panel{class = "user-profile-name", text = ["(", UserName, ")"]}
  +    ], url = UserProfileUrl}
  +  ]}.
   
   post_link(PostId) ->
     PathInfo = wf_context:path_info(),
  
positive.code:       ?ERR("Unknown person: ~p", [PersonId]),
        {"", "", ""}
    end,
  
    %% {"http","metalkia.com","/test/ttt","a=55","asd"}
    {UScheme, UHost, _UPath, _UArgs, _UPart} = mochiweb_util:urlsplit(mtc:get_env(url)),
    UserProfileUrl = mochiweb_util:urlunsplit({UScheme, UserName ++ "." ++ UHost, ["/profile"], "", ""}),
  
    [
      #panel{id="pan-"++parents_to_path(PostId, Parents), class = "comment-box", style="margin-left: "++integer_to_list(Margin)++"px;", body = [
        #panel{class = "user-identify-box", body = [
          #panel{class = "user-name", body = [
            #link{body = [
              #panel{class = "user-real-name", text = RealName},
              #panel{class = "user-profile-name", text = ["(", UserName, ")"]}
            ], url = UserProfileUrl}]},
          #panel{class = "user-avatar", body = [#gravatar{email = Email, rating = "g"}]}
        ]},
        #panel{body = [
  
negative.code:         post_id = ?a2b(PostId),
          author = Author,
          body = SanText,
          timestamp = mtc_util:timestamp(),
          parents = Parents
        },
        NewCID = mtc_entry:sput(Comment),
  