anchor.diff:          done
   end.
   
  -drop_jid_resource(Jid) ->
  +regexp_get(Jid, Regex) ->
       {match, [ShortJid]} =
  -        re:run(Jid, <<"^([^/]*)">>, [{capture, all_but_first, binary}]),
  +        re:run(Jid, Regex, [{capture, all_but_first, binary}]),
       ShortJid.
  
positive.code:          wait_for_stanza/1, wait_for_stanza/2,
           is_client/1,
           full_jid/1,
           short_jid/1]).
  
  % spawn exports
  -export([client_loop/2]).
  
negative.code:     Jid.
  
  short_jid(Client) ->
      regexp_get(full_jid(Client), <<"^([^/]*)">>).
  
  username(Client) ->
      regexp_get(full_jid(Client), <<"^([^@]*)">>).
  
  server(Client) ->
      regexp_get(full_jid(Client), <<"^[^@]*[@]([^/]*)">>).
  
  resource(Client) ->
      regexp_get(full_jid(Client), <<"^[^/]*[/](.*)">>).
  
  %%--------------------------------------------------------------------
  %% spawn export
  