From ba97fd2a3ce5fffecb1dc5be62dbd370eb3235ae Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Fri, 13 Dec 2019 20:37:51 +0100 Subject: do not insert duplicate wagongroups --- lib/Travelynx.pm | 3 +++ 1 file changed, 3 insertions(+) diff --git a/lib/Travelynx.pm b/lib/Travelynx.pm index b13c8e2..cc0f81d 100755 --- a/lib/Travelynx.pm +++ b/lib/Travelynx.pm @@ -2158,6 +2158,9 @@ sub startup { if ($is_departure) { $data->{wagonorder_dep} = $wagonorder; $user_data->{wagons} = []; + if ( exists $user_data->{wagongroups} ) { + $user_data->{wagongroups} = []; + } for my $group ( @{ $wagonorder->{data}{istformation} -- cgit v1.2.3