anchor.diff:      {reply, ok, State}.
   
   
  -handle_cast({send, Data}, #state{sock=Sock}=State) ->
  -    uds:send(Sock, Data),
  +handle_cast({send, Data}, #state{sock=Sock}=State) when is_list(Data) ->
  +    handle_cast({send, list_to_binary(Data)}, #state{sock=Sock}=State);
  +handle_cast({send, Data}, #state{sock=Sock}=State) when is_binary(Data) ->
  +    procket:sendto(Sock, Data, 0, <<>>),
       {noreply, State};
   
   handle_cast(close, #state{sock=Sock}=State) ->
  -    uds:close(Sock),
  +    procket:close(Sock),
       {stop, normal, State#state{sock=undefined}};
   
   handle_cast(stop, State) ->
  
positive.code:     {noreply, State}.
  
  
  terminate(_Reason, State) ->
      Sock = State#state.sock,
      case Sock of
  	undefined -> ignore;
  	_ -> uds:close(Sock)
      end,
      terminated.
  
negative.code:     {noreply, State}.
  
  
  handle_info({unix, Data}, #state{owner=Owner}=State) ->
      Owner ! {received, self(), Data},
      {noreply, State};
  
  handle_info({unix_closed, Sock}, #state{sock=Sock, owner=Owner}=State) ->
  