do not insert duplicate wagongroups

2019-12-13 20:37:51 +01:00 · 2019-12-13 20:37:51 +01:00 · ba97fd2a3c
commit ba97fd2a3c
parent 22b0e98b9c
1 changed files with 3 additions and 0 deletions
--- 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}