anchor.diff:      list_to_integer(Value);
   parse_value(_, Value) ->
       Value.
  +
  +%%%
  +%%% Priv
  +%%%
  +setup(BusId) when is_record(BusId, bus_id) ->
  +    dbus_connection:start_link(BusId, [list, {packet, 0}]).
  
positive.code: %% gen_server callbacks
  %%
  init([BusId, Owner]) ->
      %%process_flag(trap_exit, true),
      self() ! {setup, BusId},
      {ok, #state{owner=Owner}}.
  
  
  code_change(_OldVsn, State, _Extra) ->
      {ok, State}.
  
negative.code:     {noreply, State}.
  
  
  handle_info({setup, BusId}, State) ->
      case setup(BusId)of
  	{ok, Conn} -> {noreply, State#state{conn=Conn}};
  	ignore -> {noreply, State};
  	{error, Err} -> {stop, Err, State}
      end;
  
  handle_info({auth_ok, Conn}, #state{conn=Conn}=State) ->
      
  