anchor.diff:           create_publish_node_content_stanza/2,
            create_publish_node_content_stanza_second/2,
            create_publish_node_content_stanza_third/2,
  +         create_publish_node_content_stanza_with_timestamp/2,
            create_sub_unsubscribe_from_node_stanza/3,
            create_unsubscribe_from_node_stanza/2,
            delete_node_stanza/1,
  
positive.code:      #xmlel{name = <<"title">>, children  = [ #xmlcdata{content=[<<"The title of content.">>]}]},
       #xmlel{name = <<"summary">>, children= [ #xmlcdata{content=[<<"To be or not to be...">>]}]}
      ].
  
  entry_body_with_sample_device_id() ->
      [
  
negative.code:            attrs = [{<<"xmlns">>, NS} ],
             children = Children  }.
  
  %% timestamp is microseconds
  create_publish_node_content_stanza_with_timestamp(NodeName, ItemId) ->
      PublishEntry = publish_entry(entry_body_with_timestamp()),
      ItemTopublish = publish_item(ItemId, PublishEntry),
      PublNode = publish_node_with_content_stanza(NodeName, ItemTopublish),
      pubsub_stanza([PublNode], ?NS_PUBSUB).
  
  
  publish_sample_content_stanza(DestinationTopicName, DestinationNode, PublishItemId, User, SampleNumber) ->
      PublishToNode = case SampleNumber of
                          sample_one ->
  