anchor.diff:  check_repl_pid(Node, Pid) ->
       case rpc:call(Node, erlang, process_info, [Pid]) of
           undefined ->
  -            critical;
  +            unknown;
           Info ->
               Links = proplists:get_value(links, Info),
               Port = first_port(Links),
  
positive.code:                                     %% something has gone wrong
                                      close_port(Port),
                                      Pid ! {tcp_closed, Port},
                                      warning
                              end
                      end
              end
  
negative.code:                         undefined ->
                              %% port is closed
                              Pid ! {tcp_closed, Port},
                              socket_error;
                          _ ->
                              case sockname(Port) of
                                  {ok, _} ->
  