From 4b796e7a1c808a5cdca8b4363601a47e7f97cbe7 Mon Sep 17 00:00:00 2001 From: Birte Kristina Friesel Date: Sat, 2 Sep 2023 12:52:38 +0200 Subject: Result: store _weakened_ reference in wing_of --- lib/Travel/Status/DE/IRIS/Result.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/lib/Travel/Status/DE/IRIS/Result.pm b/lib/Travel/Status/DE/IRIS/Result.pm index 442dd1a..2a5741f 100644 --- a/lib/Travel/Status/DE/IRIS/Result.pm +++ b/lib/Travel/Status/DE/IRIS/Result.pm @@ -476,7 +476,7 @@ sub add_arrival_wingref { weaken($ref); weaken($backref); $ref->{is_wing} = 1; - $ref->{wing_of} = $self; + $ref->{wing_of} = $backref; push( @{ $self->{arrival_wings} }, $ref ); return $self; } @@ -489,7 +489,7 @@ sub add_departure_wingref { weaken($ref); weaken($backref); $ref->{is_wing} = 1; - $ref->{wing_of} = $self; + $ref->{wing_of} = $backref; push( @{ $self->{departure_wings} }, $ref ); return $self; } -- cgit v1.2.3