anchor.diff:      ?vdebug("Log: ~w", [Log]),
   
       {ok, DomainAddresses} = snmpm_config:system_info(transports),
  -    ?vdebug("DomainAddresses: ~w",[DomainAddresses]),
  +    ?vdebug("DomainAddresses: ~w", [DomainAddresses]),
       CommonSocketOpts = common_socket_opts(Opts),
  -    BindTo = get_opt(Opts, bind_to,  false),
  +    BindTo = get_opt(Opts, bind_to, false),
  +    InetBackend = case get_opt(Opts, inet_backend, use_default) of
  +                      use_default -> [];
  +                      IB          -> [{inet_backend, IB}]
  +                  end,
       case
   	[begin
   	     {IpPort, SocketOpts} =
   		 socket_params(Domain, Address, BindTo, CommonSocketOpts),
  -	     Socket = socket_open(IpPort, SocketOpts),
  -	     #transport{socket = Socket, domain = Domain}
  +             %% The 'inet-backend' option has to be first,
  +             %% so we might as well add it last.
  +	     Socket = socket_open(IpPort, InetBackend ++ SocketOpts),
  +             ?vtrace("socket created: "
  +                     "~n      Ip Port:     ~p"
  +                     "~n      Socket Opts: ~p"
  +                     "~n      Socket:      ~p", [IpPort, SocketOpts, Socket]),
  +	     #transport{socket       = Socket,
  +                        port_info    = IpPort,
  +                        opts         = SocketOpts,
  +                        inet_backend = InetBackend,
  +                        domain       = Domain}
   	 end || {Domain, Address} <- DomainAddresses]
       of
   	[] ->
  
positive.code: 
  %%%-------------------------------------------------------------------
  
  % get_opt(Key, Opts) ->
  %     ?vtrace("get option ~w", [Key]),
  %     snmp_misc:get_option(Key, Opts).
  
  get_opt(Opts, Key, Def) ->
      ?vtrace("get option ~w with default ~p", [Key, Def]),
  
negative.code: 	    _ ->
  		[]
  	end,
  
      [{socket, Id}, {info, Info}] ++ IfList ++ BufSz;
  
  get_socket_info(Id) ->
      Info = inet:info(Id),
  
      %% Does not exist for 'socket' ... yet
      %% IfList = 
      %%     case (catch inet:getif(Id)) of
      %%         {ok, IFs} ->
      %%     	[{interfaces, IFs}];
      %%         _ ->
      %%     	[]
      %%     end,
  
      BufSz = 
  	case (catch inet:getopts(Id, [recbuf, sndbuf, buffer])) of
  	    {ok, Sz} ->
  		[{buffer_size, Sz}];
  	    _ ->
  		[]
  	end,
  
      [{socket, Id}, {info, Info}] ++ BufSz.
  
  
  
  %%-----------------------------------------------------------------
  