diff options
Diffstat (limited to 'lib')
| -rwxr-xr-x | lib/Travelynx.pm | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/lib/Travelynx.pm b/lib/Travelynx.pm index be17d71..ca80352 100755 --- a/lib/Travelynx.pm +++ b/lib/Travelynx.pm @@ -1023,8 +1023,13 @@ sub startup { $old{$k} = $station->[2]{$k}; } $station->[2] = $sd; - for my $k (qw(rt_arr rt_dep arr_delay dep_delay)) { - $station->[2]{$k} ||= $old{$k}; + if ( not $station->[2]{rt_arr} ) { + $station->[2]{rt_arr} = $old{rt_arr}; + $station->[2]{arr_delay} = $old{arr_delay}; + } + if ( not $station->[2]{rt_dep} ) { + $station->[2]{rt_dep} = $old{rt_dep}; + $station->[2]{dep_delay} = $old{dep_delay}; } } } |