Loading lib/Travelynx/Helper/Traewelling.pm +4 −0 Original line number Diff line number Diff line Loading @@ -285,6 +285,10 @@ sub checkin { $opt{dep_eva} ); if ( $opt{user_data}{comment} ) { $request->{body} = $opt{user_data}{comment}; } # Work around https://github.com/Traewelling/traewelling/issues/72 $self->{user_agent}->request_timeout(20) ->get_p( Loading lib/Travelynx/Model/Traewelling.pm +1 −0 Original line number Diff line number Diff line Loading @@ -185,6 +185,7 @@ sub get_pushable_accounts { my ($self) = @_; my $res = $self->{pg}->db->query( qq{select t.user_id as uid, t.token as token, t.data as data, i.user_data as user_data, i.checkin_station_id as dep_eva, i.checkout_station_id as arr_eva, i.data as journey_data, i.train_type as train_type, i.train_line as train_line, i.train_no as train_no, Loading Loading
lib/Travelynx/Helper/Traewelling.pm +4 −0 Original line number Diff line number Diff line Loading @@ -285,6 +285,10 @@ sub checkin { $opt{dep_eva} ); if ( $opt{user_data}{comment} ) { $request->{body} = $opt{user_data}{comment}; } # Work around https://github.com/Traewelling/traewelling/issues/72 $self->{user_agent}->request_timeout(20) ->get_p( Loading
lib/Travelynx/Model/Traewelling.pm +1 −0 Original line number Diff line number Diff line Loading @@ -185,6 +185,7 @@ sub get_pushable_accounts { my ($self) = @_; my $res = $self->{pg}->db->query( qq{select t.user_id as uid, t.token as token, t.data as data, i.user_data as user_data, i.checkin_station_id as dep_eva, i.checkout_station_id as arr_eva, i.data as journey_data, i.train_type as train_type, i.train_line as train_line, i.train_no as train_no, Loading