Commit 046b1b0f authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

add option to hide delays < 5 minutes

parent d0612606

cgi/index.pl

+5 −2
Original line number Diff line number Diff line
@@ -6,7 +6,7 @@ use Travel::Status::DE::DeutscheBahn; 
use 5.014;

use utf8;



our $VERSION = '0.03';

our $VERSION = '0.04';



my $refresh_interval = 900;
@@ -37,6 +37,7 @@ sub handle_request { 


	my @platforms = split( /,/, $self->param('platforms') // q{} );

	my $template = $self->param('mode') // 'multi';

	my $hide_low_delay = $self->param('hidelowdelay') // 0;



	$self->stash( departures => [] );

	$self->stash( title      => 'db-fakedisplay' );
@@ -89,10 +90,12 @@ sub handle_request { 
		if ( $info eq '+0' ) {

			$info = undef;

		}

		if ($hide_low_delay and $info) {

			$info =~ s{ ^ (?: ca\. \s* )? \+ [ 1 2 3 4 ] $ }{}x;

		}

		if ($info) {

			$info

			  =~ s{ ^ (?: ca\. \s* )? \+ (\d+) }{Verspätung ca. $1 Min}x;

			$info =~ s{ 1 \s Minute\Kn }{}x;

		}

		push(

			@departures,

cgi/templates/layouts/default.html.ep

+3 −0
Original line number Diff line number Diff line
@@ -214,6 +214,9 @@ 
  <%= text_field 'platforms' %>

  (optional)

  <br/>

  <%= check_box 'hidelowdelay' => 1 %>

  <span class="fielddesc fieldoptional">hide delay &lt; 5 minutes</span>

  <br/>

  <span class="fielddesc fieldoptional">display type</span>

  <%= select_field mode => [['combined' => 'multi'], ['platform' => 'single']] %>

  <%= submit_button 'Display' %>