do not insert duplicate wagongroups1.11.4

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}