anchor.diff:  	     marshal_user(Group)
   	   ],
       case dbus_proxy:call(Backend, ?IFACE_BACKEND, <<"Create1">>, Args) of
  -	{ok, [KindId, MixinIds, Attributes, Serial]} ->
  -	    Entity2 = unmarshal_entity(KindId, MixinIds, Attributes),
  -	    {{ok, Entity2, unmarshal_serial(Serial)}, S};
  +	{ok, {KindId, MixinIds, Attributes, Serial}} ->
  +	    dbus_ok(KindId, MixinIds, Attributes, 
  +		    fun (Entity2) ->
  +			    {ok, Entity2, unmarshal_serial(Serial)}
  +		    end, S);
   	{error, Err} ->
   	    dbus_errors(Err, S)
       end.
  
positive.code: dbus_errors(Else, S) ->
      {{error, Else}, S}.
  
  
negative.code:     ?info("[~p] update(~s)", [?MODULE, Location]),
      Args = [ Location, Attributes ],
      case dbus_proxy:call(Backend, ?IFACE_BACKEND, <<"Update">>, Args) of
  	{ok, {KindId, MixinIds, Attributes, Serial}} ->
  	    dbus_ok(KindId, MixinIds, Attributes, 
  		    fun (Entity) ->
  			    {ok, Entity, unmarshal_serial(Serial)}
  		    end, S);
  	{error, Err} ->
  	    dbus_errors(Err, S)
      end.
  