event :discard_deleted_locations, after: :store, on: :delete do
  Env.discard_locations_for self
  if success.target == self
    success.target = :previous
  end
end

event :save_current_location, before: :show, on: :read do
  Env.save_location self
end