diff options
author | Birte Kristina Friesel <derf@finalrewind.org> | 2023-09-10 16:51:01 +0200 |
---|---|---|
committer | Birte Kristina Friesel <derf@finalrewind.org> | 2023-09-10 16:51:01 +0200 |
commit | d81251419b2f6b18b3d96a14afe9163cc2ef6661 (patch) | |
tree | 5fc19b82beb33103be41d9f76e1b00f9c608e19e /lib/DBInfoscreen/Controller/Static.pm | |
parent | 77ac1e6a8b304a0af2d46c890c270a322dfdf34d (diff) |
Always accept IRIS and HAFAS stations in input field4.18.0
Diffstat (limited to 'lib/DBInfoscreen/Controller/Static.pm')
-rw-r--r-- | lib/DBInfoscreen/Controller/Static.pm | 28 |
1 files changed, 0 insertions, 28 deletions
diff --git a/lib/DBInfoscreen/Controller/Static.pm b/lib/DBInfoscreen/Controller/Static.pm index 22f2034..927bf6e 100644 --- a/lib/DBInfoscreen/Controller/Static.pm +++ b/lib/DBInfoscreen/Controller/Static.pm @@ -11,34 +11,6 @@ my %default = ( admode => 'deparr', ); -sub redirect { - my ($self) = @_; - my $input = $self->param('input'); - my $params = $self->req->params; - - $params->remove('input'); - - for my $param (qw(platforms mode admode via)) { - if ( - not $params->param($param) - or ( exists $default{$param} - and $params->param($param) eq $default{$param} ) - ) - { - $params->remove($param); - } - } - - $params = $params->to_string; - - if ( $input =~ m{ ^ [a-zA-Z]{1,5} \s+ \d+ $ }x ) { - $self->redirect_to("/z/${input}?${params}"); - } - else { - $self->redirect_to("/${input}?${params}"); - } -} - sub geostop { my ($self) = @_; |