anchor.diff:      #sipreg{}.
   
   update_register(Reg, Code, Meta, #state{app_id=AppId}) when Code>=200, Code<300 ->
  -    #sipreg{id=RegId, monitor=Monitor, interval=Interval, from=From} = Reg,
  +    #sipreg{id=RegId, conn_monitor=Monitor, interval=Interval, from=From} = Reg,
       case From of
           undefined -> ok;
           _ -> gen_server:reply(From, {ok, true})
  
positive.code: handle_call({'$nksip_stop_register', RegId}, From, State) ->
      #state{app_id=AppId, regs=Regs} = State,
      case lists:keytake(RegId, #sipreg.id, Regs) of
          {value, #sipreg{monitor=Monitor}=Reg, Regs1} -> 
              gen_server:reply(From, ok),
              case is_reference(Monitor) of
                  true -> erlang:demonitor(Monitor);
  
negative.code:     ok.
  
  launch_unregister(AppId, Reg)->
  
      lager:warning("LAUNCH UNREGISTER"),
  
      #sipreg{
          ruri = RUri,
          opts = Opts, 
          cseq = CSeq,
          call_id = CallId,
          conn_pid = Pid
      } = Reg,
      Opts1 = [
          make_contact, {call_id, CallId}, {cseq, CSeq}, {expires, 0}
  