add recursive / with_related support for IRIS backend

1 files changed, 5 insertions, 0 deletions

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};