From ba97fd2a3ce5fffecb1dc5be62dbd370eb3235ae Mon Sep 17 00:00:00 2001
From: Daniel Friesel <derf@finalrewind.org>
Date: Fri, 13 Dec 2019 20:37:51 +0100
Subject: [PATCH] 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}