anchor.diff:      begin
         [#panel{id="pan-"++?a2l(Id), style="margin-left: 50px;", body = [
           #panel{body = [
  -          #panel{class = "post-body", body = cutted_body(Post)}
  +          #panel{class = "post", body = [
  +            #panel{class = "post-title", body = [#link{body = Post#mt_post.title, url = post_link(?a2l(Post#mt_post.id))}]},
  +            #panel{class = "post-body", body = [cutted_body(Post)]}
  +          ]}
           ]},
           default_items_post(Post),
           #hr{}
  
positive.code:     error ->
        []
    end,
    post_editor("comment-items", "", TagList, "Submit", add_post, "Cancel", cancel_add).
  
  
  post_editor(Id, Body, TagList, Submit, SubmitPostback, Cancel, CancelPostback) ->
    #panel{id = Id,
      body = [
        #textarea{id="textarea", class="post-input", text = Body},
        #tagsinput{id="tags-input", text = unicode:characters_to_binary(string:join([unicode:characters_to_list(T) || T <- TagList], ","))},
        #button{id = submit, text = Submit, postback = SubmitPostback},
  
negative.code:     PostAuthorId =/= UserBin ->
        error;
      true ->
        Title = wf:q("post-title"),
        Text = wf:q("textarea"),
        Tags = wf:q("tags-input"),
        mtc_entry:supdate(Post#mt_post{
          title = case Title of undefined -> Title; _ -> unicode:characters_to_binary(mtws_sanitizer:sanitize(sanitize_fix(Title))) end,
          body = case Text of undefined -> Text; _ -> unicode:characters_to_binary(mtws_sanitizer:sanitize(sanitize_fix(Text))) end,
          tags = [unicode:characters_to_binary(sanit(unicode:characters_to_binary(T))) || T <- string:tokens(unicode:characters_to_list(list_to_binary(Tags)), ",")],
          origin = ?MT_ORIGIN
  