def refault( object, gid, editing_context )
object.to_one_relationship_keys.each do |key|
if destination = object[key] then
dest_gid = editing_context.gid destination
forget_snapshot dest_gid
@database.forget_snapshot dest_gid
handler = AccessFaultHandler.new(dest_gid, self, editing_context)
destination.turn_into_fault handler
end
end
object.to_many_relationship_keys.each do |key|
destinations = object[key]
if FaultingDelayEvaluationArray === destinations then
destinations.each do |destination|
dest_gid = editing_context.gid destination
forget_snapshot dest_gid
@database.forget_snapshot dest_gid
editing_context.forget destination
end
handler = AccessArrayFaultHandler.new(gid, key, self, editing_context)
destinations.turn_into_fault handler
end
end
end