From c8f9fc901b440cb5f99fa531c6884af2b997ad97 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Sat, 16 Mar 2019 21:33:19 +0100 Subject: allow manual input of station name Closes #1 --- index.pl | 7 +++++++ 1 file changed, 7 insertions(+) (limited to 'index.pl') diff --git a/index.pl b/index.pl index 066cf0b..467eed4 100755 --- a/index.pl +++ b/index.pl @@ -988,6 +988,13 @@ post '/geolocation' => sub { }; +post '/list_departures' => sub { + my ($self) = @_; + my $station = $self->param('station'); + + $self->redirect_to("/s/${station}"); +}; + get '/api/v0/:action/:token' => sub { my ($self) = @_; -- cgit v1.2.3