anchor.diff:  
   
   host() ->
  +    do_host(inet).
  +
  +host(transportDomainUdpIpv4) ->
  +    do_host(inet);
  +host(transportDomainUdpIpv6) ->
  +    do_host(inet6).
  +
  +do_host(Fam) ->
       case (catch inet:gethostname()) of
   	{ok, Name} ->
  -	    case (catch inet:getaddr(Name, inet)) of
  +	    case (catch inet:getaddr(Name, Fam)) of
   		{ok, Addr} when is_tuple(Addr) ->
   		    lists:flatten(
   		      io_lib:format("~w.~w.~w.~w", tuple_to_list(Addr)));
  -		_ ->
  -		    "127.0.0.1"
  +		_ when (Fam =:= inet) ->
  +		    "127.0.0.1";
  +                _ when (Fam =:= inet6)  ->
  +                    "::1"
   	    end;
  -	_ -> 
  -	    "127.0.0.1"
  +        _ when (Fam =:= inet) ->
  +            "127.0.0.1";
  +        _ when (Fam =:= inet6)  ->
  +            "::1"
       end.
   
   guess_agent_name() ->
  
positive.code: 
  write_agent_snmp_files(
    Dir, Vsns, ManagerIP, TrapUDP, AgentIP, AgentUDP, SysName,
    NotifType, SecType, Passwd, EngineID, MMS) ->
      Domain = snmp_target_mib:default_domain(),
      ManagerAddr = {ManagerIP, TrapUDP},
      write_agent_snmp_conf(Dir, AgentIP, AgentUDP, EngineID, MMS),
  
negative.code:     ok;
  write_agent_snmp_files(
    Dir, Vsns, Domain, ManagerAddr, AgentAddr, SysName,
    NotifType, SecType, Passwd, EngineID, MMS)
    when is_list(Dir) andalso
         is_list(Vsns) andalso
         is_atom(Domain) andalso
         is_tuple(ManagerAddr) andalso
         is_tuple(ManagerAddr) andalso
         is_list(SysName) andalso
         is_atom(NotifType) ->
      write_agent_snmp_conf(Dir, [{Domain, AgentAddr}], EngineID, MMS),
      write_agent_snmp_context_conf(Dir),
      write_agent_snmp_community_conf(Dir),
  