I keep breaking the RIS... (39d159d3) · Commits · derf / db-infoscreen

index.pl

+54 −28

Original line number	Diff line number	Diff line
		@@ -322,6 +322,7 @@ sub handle_request {
		if ($info) {
		$info =~ s{ (?: ca\. \s* )? \+ (\d+) }{Verspätung ca $1 Min.}x;
		}
		if ($backend eq 'iris') {
		push(
		@departures,
		{
		@@ -351,6 +352,31 @@ sub handle_request {
		}
		);
		}
		else {
		push(
		@departures,
		{
		time => $time,
		train => $result->train,
		via => [ $result->route_interesting(3) ],
		destination => $result->destination,
		platform => $platform,
		info => $info,
		is_cancelled => $result->can('is_cancelled')
		? $result->is_cancelled
		: undef,
		messages => {
		delay => [ ],
		qos => [ ],
		},
		moreinfo => $moreinfo,
		delay => $delay,
		additional_stops => [ ],
		canceled_stops => [ ],
		}
		);
		}
		}

		if ( $template eq 'json' ) {
		my $json = $self->render_to_string(