diff options
Diffstat (limited to 'lib')
| -rwxr-xr-x | lib/Travelynx.pm | 11 | 
1 files changed, 7 insertions, 4 deletions
| diff --git a/lib/Travelynx.pm b/lib/Travelynx.pm index 7d3548e..860ba87 100755 --- a/lib/Travelynx.pm +++ b/lib/Travelynx.pm @@ -585,9 +585,10 @@ sub startup {  				);  			} -			if ( not( defined $train or $force ) ) { +			if ( not defined $train ) { -				# Arrival time via IRIS is unknown, try falling back to HAFAS +               # Arrival time via IRIS is unknown, so the train probably has not +               # arrived yet. Fall back to HAFAS.  				if ( my $station_data  					= first { $_->[0] eq $station } @{ $journey->{route} } )  				{ @@ -611,8 +612,10 @@ sub startup {  						);  					}  				} -				$self->run_hook( $uid, 'update' ); -				return ( 1, undef ); +				if ( not $force ) { +					$self->run_hook( $uid, 'update' ); +					return ( 1, undef ); +				}  			}  			my $has_arrived = 0; | 
