From f6bff01f76526ed18f9a763543db362e8d3fe7fa Mon Sep 17 00:00:00 2001
From: Daniel Friesel <derf@finalrewind.org>
Date: Fri, 13 Dec 2019 17:28:52 +0100
Subject: save wagongroups if available

---
 lib/Travelynx.pm | 9 +++++++++
 1 file changed, 9 insertions(+)

(limited to 'lib')

diff --git a/lib/Travelynx.pm b/lib/Travelynx.pm
index 57e8e5b..b13c8e2 100755
--- a/lib/Travelynx.pm
+++ b/lib/Travelynx.pm
@@ -2178,6 +2178,15 @@ sub startup {
 										}
 									);
 								}
+								if (    $group->{fahrzeuggruppebezeichnung}
+									and $group->{fahrzeuggruppebezeichnung}
+									=~ m{ ^ ICE }x )
+								{
+									push(
+										@{ $user_data->{wagongroups} },
+										$group->{fahrzeuggruppebezeichnung}
+									);
+								}
 							}
 							$db->update(
 								'in_transit',
-- 
cgit v1.2.3