From 1bf2ad57fdc64aa78685af6ebc568af1a41bfeb3 Mon Sep 17 00:00:00 2001
From: Daniel Friesel <derf@finalrewind.org>
Date: Thu, 7 Jul 2011 10:27:49 +0200
Subject: db-ris: Improve delayed / on-time info filter
---
bin/db-ris | 4 +---
1 file changed, 1 insertion(+), 3 deletions(-)
(limited to 'bin')
diff --git a/bin/db-ris b/bin/db-ris
index 99e07b0..234a912 100755
--- a/bin/db-ris
+++ b/bin/db-ris
@@ -87,9 +87,7 @@ sub display_result {
sub filter_info {
my ($info) = @_;
- if ( $info =~ m{ ^ (?: p.nktlich | k [.] A [.] ) $ }ox ) {
- return q{};
- }
+ $info =~ s{ (?: ^ | , ) (?: p.nktlich | k [.] A [.] ) }{}x;
return $info;
}
--
cgit v1.2.3