db-ris: Improve delayed / on-time info filter

1 files changed, 1 insertions, 3 deletions

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;
 }