diff options
| -rw-r--r-- | cgi/index.pl | 12 | ||||
| -rw-r--r-- | cgi/templates/layouts/default.html.ep | 5 |
2 files changed, 17 insertions, 0 deletions
diff --git a/cgi/index.pl b/cgi/index.pl index 8558ec3..531ee5e 100644 --- a/cgi/index.pl +++ b/cgi/index.pl @@ -4,6 +4,7 @@ use Cache::File; use List::MoreUtils qw(any); use Travel::Status::DE::DeutscheBahn; use Travel::Status::DE::IRIS; +use Travel::Status::DE::IRIS::Stations; use 5.014; use utf8; @@ -79,6 +80,17 @@ sub handle_request { my @results = get_results_for( $backend, $station ); if ( not @results ) { + if ( $backend eq 'iris' ) { + my @candidates = map { [ "$_->[1] ($_->[0])", $_->[0] ] } + Travel::Status::DE::IRIS::Stations::get_station($station); + if (@candidates) { + $self->render( + 'multi', + stationlist => \@candidates, + hide_opts => 0 + ); + } + } $self->render( 'multi', error => "Got no results for '$station'", diff --git a/cgi/templates/layouts/default.html.ep b/cgi/templates/layouts/default.html.ep index 873def3..a9782ad 100644 --- a/cgi/templates/layouts/default.html.ep +++ b/cgi/templates/layouts/default.html.ep @@ -362,7 +362,12 @@ <div class="field"> <div class="desc">Station name</div> <div> +% if (stash('stationlist')) { + %= select_field station => stash('stationlist') +% } +% else { %= text_field 'station' +% } %= submit_button 'Display' </div> </div> |