anchor.diff:              end,
   
               case z_db:transaction(F, Context) of
  +				0 -> 
  +					ok;
                   N when is_integer(N) -> 
                       z_depcache:flush(SubjectId, Context),
                       z_depcache:flush(ObjectId, Context),
  +					[
  +						z_notifier:notify({edge_delete, SubjectId, PredName, ObjectId}, Context)
  +						|| PredName <- PredNames
  +					],
                       ok;
                   Error -> 
                       Error
  
positive.code:             z_db:transaction(F, Context),
              z_depcache:flush(SubjectId, Context),
              z_depcache:flush(ObjectId, Context),
              ok;
          AclError ->
              {error, {acl, AclError}}
  
negative.code:             case z_db:transaction(F, Context) of
                  {ok,EdgeId} ->
                      z_depcache:flush(SubjectId, Context),
  					z_notifier:notify({edge_insert, SubjectId, PredName, ObjectId}, Context),
                      {ok, EdgeId};
                  {error, Reason} ->
                      {error, Reason}
  