mirror of
https://github.com/derf/travelynx
synced 2025-02-18 06:18:28 +00:00
Use the correct stop instance when checking in to ring lines
This commit is contained in:
parent
481c49a3c2
commit
9b6b310e2e
2 changed files with 13 additions and 3 deletions
|
@ -441,6 +441,7 @@ sub startup {
|
|||
|
||||
my $station = $opt{station};
|
||||
my $train_id = $opt{train_id};
|
||||
my $ts = $opt{ts};
|
||||
my $uid = $opt{uid} // $self->current_user->{id};
|
||||
my $db = $opt{db} // $self->pg->db;
|
||||
my $hafas;
|
||||
|
@ -534,6 +535,7 @@ sub startup {
|
|||
|
||||
my $station = $opt{station};
|
||||
my $train_id = $opt{train_id};
|
||||
my $ts = $opt{ts};
|
||||
my $uid = $opt{uid} // $self->current_user->{id};
|
||||
my $db = $opt{db} // $self->pg->db;
|
||||
my $hafas;
|
||||
|
@ -553,7 +555,13 @@ sub startup {
|
|||
or $stop->loc->eva == $station )
|
||||
{
|
||||
$found = $stop;
|
||||
last;
|
||||
|
||||
# Lines may serve the same stop several times.
|
||||
# Keep looking until the scheduled departure
|
||||
# matches the one passed while checking in.
|
||||
if ( $ts and $stop->sched_dep->epoch == $ts ) {
|
||||
last;
|
||||
}
|
||||
}
|
||||
}
|
||||
if ( not $found ) {
|
||||
|
|
|
@ -650,7 +650,8 @@ sub travel_action {
|
|||
return $self->checkin_p(
|
||||
hafas => $params->{hafas},
|
||||
station => $params->{station},
|
||||
train_id => $params->{train}
|
||||
train_id => $params->{train},
|
||||
ts => $params->{ts},
|
||||
);
|
||||
}
|
||||
)->then(
|
||||
|
@ -789,7 +790,8 @@ sub travel_action {
|
|||
$self->checkin_p(
|
||||
hafas => $params->{hafas},
|
||||
station => $params->{station},
|
||||
train_id => $params->{train}
|
||||
train_id => $params->{train},
|
||||
ts => $params->{ts},
|
||||
)->then(
|
||||
sub {
|
||||
$self->render(
|
||||
|
|
Loading…
Add table
Reference in a new issue