diff options
author | Daniel Friesel <derf@finalrewind.org> | 2019-12-13 20:37:51 +0100 |
---|---|---|
committer | Daniel Friesel <derf@finalrewind.org> | 2019-12-13 20:37:51 +0100 |
commit | ba97fd2a3ce5fffecb1dc5be62dbd370eb3235ae (patch) | |
tree | 2ef0f53a71810f8b5b07301564f9e036f8c37d6f /lib/Travelynx.pm | |
parent | 22b0e98b9cddc7721e4a95e0c007c152ba09a07f (diff) |
do not insert duplicate wagongroups1.11.4
Diffstat (limited to 'lib/Travelynx.pm')
-rwxr-xr-x | lib/Travelynx.pm | 3 |
1 files changed, 3 insertions, 0 deletions
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} |