anchor.diff:          post_id = ?a2b(PostId),
           author = Author,
           body = Text,
  -        body_html = SanText,
  +        body_html = case Text of undefined -> Text; _ -> unicode:characters_to_binary(mtws_sanitizer:sanitize(Format, if Format =:= "html" -> sanitize_fix(Text); true -> ?a2b(Text) end)) end,
  +        format = mt_format(Format),
           timestamp = mtc_util:timestamp(),
           parents = Parents
         },
  
positive.code:       #button{id = cancel, text = Cancel, postback = CancelPostback}
    ]}.
  
  comment_post_items(Id) ->
    #panel{id = "comment-items-"++Id, class = "comment-add-box",
      body = [
        #textarea{id="textarea-"++Id},
        #br{},
        #button{id=submit, text="Submit",postback="add-comment-" ++ Id},
        #button{text="Cancel",postback="cancel-comment-" ++ Id}
  
negative.code:       LevelQ = wf:q("level-"++Path),
        Level = if LevelQ == undefined -> "0"; true -> LevelQ end,
        Text = wf:q("textarea-"++Path),
        Format = wf:q(input_format),
        [PostId|_] = string:tokens(Path, "-"),
        [_PostId|Parents] = path_to_parents(Path),
  
        UserName = ?a2b(wf:user()),                   % FIXME
        Author = #mt_author{
          id = UserName,
  