diff options
Diffstat (limited to 'lib/Travelynx.pm')
| -rwxr-xr-x | lib/Travelynx.pm | 14 |
1 files changed, 13 insertions, 1 deletions
diff --git a/lib/Travelynx.pm b/lib/Travelynx.pm index 8e21f16..f44bb8a 100755 --- a/lib/Travelynx.pm +++ b/lib/Travelynx.pm @@ -2785,6 +2785,10 @@ sub startup { # Otherwise, we grab a fresh one. my $db = $opt{db} // $self->pg->db; + my @select + = ( + qw(journey_id train_type train_line train_no checkin_ts sched_dep_ts real_dep_ts dep_eva checkout_ts sched_arr_ts real_arr_ts arr_eva edited route messages user_data) + ); my %where = ( user_id => $uid, cancelled => 0 @@ -2812,9 +2816,13 @@ sub startup { -between => [ $opt{after}->epoch, $opt{before}->epoch, ] }; } + if ( $opt{with_polyline} ) { + push( @select, 'polyline' ); + } + my @travels; - my $res = $db->select( 'journeys_str', '*', \%where, \%order ); + my $res = $db->select( 'journeys_str', \@select, \%where, \%order ); for my $entry ( $res->expand->hashes->each ) { @@ -2837,6 +2845,10 @@ sub startup { user_data => $entry->{user_data}, }; + if ( $opt{with_polyline} ) { + $ref->{polyline} = $entry->{polyline}; + } + if ( my $station = $self->app->station_by_eva->{ $ref->{from_eva} } ) { |