diff options
| author | Birte Kristina Friesel <derf@finalrewind.org> | 2025-11-30 20:26:38 +0100 |
|---|---|---|
| committer | Birte Kristina Friesel <derf@finalrewind.org> | 2025-11-30 20:26:38 +0100 |
| commit | 239e86714c3a6e869f58080b59000737e20fe545 (patch) | |
| tree | 15e065409b55b9f16c755a6beba7d114252473d1 /lib/Travelynx/Model/InTransit.pm | |
| parent | 9955a3b6f8692c4808ea560e5e2e168a9061bc0d (diff) | |
InTransit->add: store trip number at checkin stop, if available
See https://github.com/derf/Travel-Status-DE-DBRIS/issues/9
Diffstat (limited to 'lib/Travelynx/Model/InTransit.pm')
| -rw-r--r-- | lib/Travelynx/Model/InTransit.pm | 6 |
1 files changed, 5 insertions, 1 deletions
diff --git a/lib/Travelynx/Model/InTransit.pm b/lib/Travelynx/Model/InTransit.pm index fc426bc..8324027 100644 --- a/lib/Travelynx/Model/InTransit.pm +++ b/lib/Travelynx/Model/InTransit.pm @@ -264,7 +264,11 @@ sub add { and $stop and ref($journey) eq 'Travel::Status::DE::DBRIS::Journey' ) { - my $number = $journey->train_no // $journey->number // $train_suffix; + my $trip_no + = $journey->trip_no_at( $stop->eva, + $stop->sched_dep ? $stop->sched_dep->epoch : undef ) + // $journey->train_no; + my $number = $trip_no // $journey->number // $train_suffix; my $line; if ( defined $journey->line_no and $journey->line_no ne $number ) { |