From 784c3d193f669ede6bde3b9c734455a5eaf39546 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Wed, 13 Jul 2011 13:38:35 +0200 Subject: Use new Travel::Status::DE::DeutscheBahn stuff --- bin/db-fakedisplay | 9 ++------- 1 file changed, 2 insertions(+), 7 deletions(-) (limited to 'bin/db-fakedisplay') diff --git a/bin/db-fakedisplay b/bin/db-fakedisplay index 7930285..7d7aec5 100755 --- a/bin/db-fakedisplay +++ b/bin/db-fakedisplay @@ -38,18 +38,13 @@ if (not defined $info) { exit 1; } -my @via = $info->route; -my $extra = $info->info; - -$extra =~ s{ (?: ^ | , ) (?: p.nktlich | k [.] A [.] ) }{}x; - $template->param( time => $info->time, train => $info->train, - via => [ map { { stop => $_ } } splice(@via, 0, 3) ], + via => [ map { { stop => $_ } } $info->route_interesting(3) ], destination => $info->destination, platform => $info->platform, - info => $extra, + info => $info->info, ); say $template->output; -- cgit v1.2.3