diff options
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/Travelynx/Command/work.pm | 9 |
1 files changed, 8 insertions, 1 deletions
diff --git a/lib/Travelynx/Command/work.pm b/lib/Travelynx/Command/work.pm index 5ea1810..877184d 100644 --- a/lib/Travelynx/Command/work.pm +++ b/lib/Travelynx/Command/work.pm @@ -111,7 +111,12 @@ sub run { $train_id, $found_dep->eva ); } - if ( $found_arr and $found_arr->rt_arr ) { + if ( + $found_arr + and + ( $found_arr->rt_arr or $found_arr->is_cancelled ) + ) + { $self->app->in_transit->update_arrival_dbris( uid => $uid, journey => $journey, @@ -120,6 +125,8 @@ sub run { dep_eva => $dep, arr_eva => $arr ); + } + if ( $found_arr and $found_arr->rt_arr ) { if ( $found_arr->arr->epoch - $now->epoch < 600 ) { $self->app->add_wagonorder( uid => $uid, |