Commit 21234707 authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

add_journey: allow up to 99 journeys per 24 hours

parent d7c69acf

lib/Travelynx.pm

+21 −0
Original line number Diff line number Diff line
@@ -383,6 +383,27 @@ sub startup { 
				return ( undef, 'Unbekannter Zielbahnhof' );

			}



			my $daily_journey_count = $db->select(

				'journeys_str',

				'count(*) as count',

				{

					user_id     => $uid,

					real_dep_ts => {

						-between => [

							$opt{rt_departure}->clone->subtract( days => 1 )

							  ->epoch,

							$opt{rt_departure}->epoch

						],

					},

				}

			)->hash->{count};



			if ( $daily_journey_count >= 100 ) {

				return ( undef,

"In den 24 Stunden vor der angegebenen Abfahrtszeit wurden ${daily_journey_count} weitere Fahrten angetreten. Das kann nicht stimmen."

				);

			}



			my @route = ( [ $dep_station->[1], {}, undef ] );



			if ( $opt{route} ) {