summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDerf Null <derf@finalrewind.org>2023-05-01 11:19:40 +0200
committerDerf Null <derf@finalrewind.org>2023-05-01 11:19:40 +0200
commit38071ce2ad25189ef7bbe14508e3d23e5a913001 (patch)
tree2abcfb1e54bbbc7c37ef69d323c65dafebeedcd1
parent2ce7ee4da0c013446e87500b532734c0759e5069 (diff)
treat delays as integers. what the fuck.
-rw-r--r--lib/Travel/Status/DE/HAFAS/Journey.pm4
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/Travel/Status/DE/HAFAS/Journey.pm b/lib/Travel/Status/DE/HAFAS/Journey.pm
index 512da5f..7fa9014 100644
--- a/lib/Travel/Status/DE/HAFAS/Journey.pm
+++ b/lib/Travel/Status/DE/HAFAS/Journey.pm
@@ -121,12 +121,12 @@ sub new {
my $arr_delay
= ( $sched_arr and $rt_arr )
- ? ( $rt_arr->epoch - $sched_arr->epoch ) / 60
+ ? 0 + ( $rt_arr->epoch - $sched_arr->epoch ) / 60
: undef;
my $dep_delay
= ( $sched_dep and $rt_dep )
- ? ( $rt_dep->epoch - $sched_dep->epoch ) / 60
+ ? 0 + ( $rt_dep->epoch - $sched_dep->epoch ) / 60
: undef;
my $arr_cancelled = $stop->{aCncl};