From 590b27f2ca5573828f362b034a8182b79114391e Mon Sep 17 00:00:00 2001
From: Daniel Friesel <derf@finalrewind.org>
Date: Sun, 23 Jun 2019 18:46:25 +0200
Subject: also show exit direction for regional trains at select stations

---
 lib/Travelynx.pm            | 14 ++++++++++++++
 templates/changelog.html.ep | 12 ++++++++++++
 2 files changed, 26 insertions(+)

diff --git a/lib/Travelynx.pm b/lib/Travelynx.pm
index d6a4899..afeb880 100755
--- a/lib/Travelynx.pm
+++ b/lib/Travelynx.pm
@@ -2259,9 +2259,15 @@ sub startup {
 
 				my @route = @{ $in_transit->{route} // [] };
 				my @route_after;
+				my $stop_before_dest;
 				my $is_after = 0;
 				for my $station (@route) {
 
+					if (    $in_transit->{arr_name}
+						and $station->[0] eq $in_transit->{arr_name} )
+					{
+						$stop_before_dest = $route_after[-1][0];
+					}
 					if ($is_after) {
 						push( @route_after, $station );
 					}
@@ -2376,6 +2382,14 @@ sub startup {
 						if ( $platform_info->{kopfgleis} ) {
 							$ret->{arr_direction} = $platform_info->{direction};
 						}
+						elsif ( $stop_before_dest
+							and exists $platform_info->{direction_from}
+							{$stop_before_dest} )
+						{
+							$ret->{arr_direction}
+							  = $platform_info->{direction_from}
+							  {$stop_before_dest};
+						}
 						elsif ( $in_transit->{data}{wagonorder_arr} ) {
 							my $wr;
 							eval {
diff --git a/templates/changelog.html.ep b/templates/changelog.html.ep
index d7c8bb4..ed0bff8 100644
--- a/templates/changelog.html.ep
+++ b/templates/changelog.html.ep
@@ -1,5 +1,17 @@
 <h1>Changelog</h1>
 
+<div class="row">
+	<div class="col s12 m1 l1">
+		1.8
+	</div>
+	<div class="col s12 m11 l11">
+		<p>
+			<i class="material-icons left">add</i> Angabe der Ausstiegsseite für
+			einzelne Züge und Zielbahnhöfe.
+		</p>
+	</div>
+</div>
+
 <div class="row">
 	<div class="col s12 m1 l1">
 		1.7
-- 
cgit v1.2.3