anchor.diff:          post_deploy_actions = [{caterpillar_event, sync_event, [{notify, get_notify_message(Subj, Message)}]}]
       },
       caterpillar_event:sync_event({deploy, Deploy}).
  +
  +
  +format_tag([]) -> "";
  +format_tag(<<>>) -> "";
  +format_tag(undefined) -> "";
  +format_tag(Tag) when is_binary(Tag) -> format_tag(binary_to_list(Tag));
  +format_tag(Tag) when is_list(Tag) -> "/" ++ Tag;
  +format_tag(Tag) -> lists:flatten(io_lib:format("/~p", [Tag])).
  
positive.code:         RevDef#rev_def.work_id,
          binary_to_list(RevDef#rev_def.name),
          binary_to_list(RevDef#rev_def.branch),
          binary_to_list(RevDef#rev_def.tag),
          Type,
          Arch
      ]),
  
negative.code:             State,
              ?BTL(N),
              ?BTL(B),
              format_tag(T), 
              Ident#ident.type,
              Ident#ident.arch
          ]),
  