summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorBirte Kristina Friesel <derf@finalrewind.org>2025-04-21 19:35:30 +0200
committerBirte Kristina Friesel <derf@finalrewind.org>2025-04-21 19:35:30 +0200
commitc90ae4cf579870a4bd2c6b3e9b2048b0acfced19 (patch)
tree6d24a6432007c7f3fb58d6235a45a21e45b7ca1a
parentd5928c792682bc29e5758eba78a4cdf1996e60fc (diff)
InTransit->add: dbris: ensure that train_no is always setHEAD2.11.23main
-rw-r--r--lib/Travelynx/Model/InTransit.pm8
1 files changed, 5 insertions, 3 deletions
diff --git a/lib/Travelynx/Model/InTransit.pm b/lib/Travelynx/Model/InTransit.pm
index 9f9dd9b..0795179 100644
--- a/lib/Travelynx/Model/InTransit.pm
+++ b/lib/Travelynx/Model/InTransit.pm
@@ -196,11 +196,13 @@ sub add {
elsif ( $journey and $stop ) {
# DBRIS
+ my $number = $journey->train_no // $journey->number // $train_suffix;
+
my $line;
- if ( $journey->line_no ne $journey->train_no ) {
+ if ( defined $journey->line_no and $journey->line_no ne $number ) {
$line = $journey->line_no;
}
- elsif ( $train_suffix ne $journey->train_no ) {
+ elsif ( defined $train_suffix and $train_suffix ne $number ) {
$line = $train_suffix;
}
@@ -254,7 +256,7 @@ sub add {
dep_platform => $stop->platform,
train_type => $journey->type // q{},
train_line => $line,
- train_no => $journey->train_no,
+ train_no => $number,
train_id => $data->{trip_id},
sched_departure => $stop->sched_dep,
real_departure => $stop->rt_dep // $stop->sched_dep,