From 08a0bdb1afa1c7ee598134e276e945f899688b81 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Fri, 25 Dec 2015 21:52:43 +0100 Subject: add recursive / with_related support for IRIS backend --- index.pl | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'index.pl') diff --git a/index.pl b/index.pl index bbe07e0..095e0e1 100644 --- a/index.pl +++ b/index.pl @@ -304,6 +304,7 @@ sub handle_request { my $show_realtime = $self->param('show_realtime') // 0; my $backend = $self->param('backend') // 'iris'; my $admode = $self->param('admode') // 'deparr'; + my $with_related = $self->param('recursive') // 0; my $callback = $self->param('callback'); my $apiver = $self->param('version') // 0; my %opt; @@ -335,6 +336,10 @@ sub handle_request { $opt{lookahead} = 120; } + if ($with_related) { + $opt{with_related} = 1; + } + my @departures; my $data = get_results_for( $backend, $station, %opt ); my $results_ref = $data->{results}; -- cgit v1.2.3