anchor.diff:      case io:get_line(Fd, '') of
   	eof ->
   	    {error, not_found};
  +	{error,Error} ->
  +	    %% Rare... For example NFS errors
  +	    {error,Error};
   	Line ->
   	    case ssh_decode_line(Line, known_hosts) of
   		[{Key, Attributes}] ->
  
positive.code:     case io:get_line(Fd, '') of
  	eof ->
  	    {error, not_found};
  	Line ->
  	    case ssh_decode_line(Line, auth_keys) of
  		[{AuthKey, _}] ->
  
negative.code:     Host1 = host_name(Host),
      case lists:member(Host1, HostList) andalso key_match(Key, KeyType) of
  	true when KeyToMatch == Key ->
  	    {ok,Key};
  	_ ->
  	    lookup_host_key_fd(Fd, KeyToMatch, Host, KeyType)
      end.
  