anchor.diff:        #button{id = cancel, text = Cancel, postback = CancelPostback}
     ]}.
   
  -comment_post_items(Id) ->
  +comment_post_items(Id, Format) ->
     #panel{id = "comment-items-"++Id, class = "comment-add-box",
       body = [
         #textarea{id="textarea-"++Id},
  +      #br{},
  +      #dropdown{id=input_format, options =
  +        [#option{text=TVal, value=Val, selected=Val=:=Format} || {TVal, Val} <- [{"HTML", "html"}, {"Markdown", "markdown"}]]},
         #br{},
         #button{id=submit, text="Submit",postback="add-comment-" ++ Id},
         #button{text="Cancel",postback="cancel-comment-" ++ Id}
  
positive.code:   User = wf:user(),
    if
      User =/= undefined ->
        wf:replace(Target, comment_post_items(Id));
      true ->
        pass
    end.
  
negative.code:         post_id = ?a2b(PostId),
          author = Author,
          body = Text,
          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
        },
  