Unverified Commit c98ce247 authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

work: add optional timout

parent cea89566

lib/Travelynx/Command/work.pm

+8 −1
Original line number Diff line number Diff line
@@ -18,7 +18,7 @@ has description => 'Update real-time data of active journeys'; 
has usage => sub { shift->extract_usage };



sub run {

	my ( $self, $backend ) = @_;

	my ( $self, $backend, $timeout ) = @_;



	my $now              = DateTime->now( time_zone => 'Europe/Berlin' );

	my $checkin_deadline = $now->clone->subtract( hours => 48 );
@@ -43,6 +43,13 @@ sub run { 


	for my $entry ( $self->app->in_transit->get_all_active ) {



		if ( $timeout

			and DateTime->now( time_zone => 'Europe/Berlin' )->epoch

			- $now->epoch > $timeout )

		{

			last;

		}



		if ( -e 'maintenance' ) {

			$self->app->log->debug('work: "maintenance" file found, aborting');

			return;