From 10687196f1f39d01c17a415898758b3a65608396 Mon Sep 17 00:00:00 2001
From: Daniel Friesel <derf@finalrewind.org>
Date: Wed, 13 Jul 2011 13:13:24 +0200
Subject: DeutscheBahn/Result: Return only useful text in info, add info_raw
 for the raw string

---
 bin/db-ris | 10 +---------
 1 file changed, 1 insertion(+), 9 deletions(-)

(limited to 'bin')

diff --git a/bin/db-ris b/bin/db-ris
index f5633b0..962b5cd 100755
--- a/bin/db-ris
+++ b/bin/db-ris
@@ -84,14 +84,6 @@ sub display_result {
 	return;
 }
 
-sub filter_info {
-	my ($info) = @_;
-
-	$info =~ s{ (?: ^ | , ) (?: p.nktlich | k [.] A [.] ) }{}x;
-
-	return $info;
-}
-
 sub filter_via {
 	my (@via) = @_;
 
@@ -151,7 +143,7 @@ for my $d ( $status->results() ) {
 		[
 			$d->time, $d->train,
 			join( q{  }, filter_via(@via) ), $d->destination,
-			$d->platform, filter_info( $d->info )
+			$d->platform, $d->info,
 		]
 	);
 }
-- 
cgit v1.2.3