From 2d48e0fe2f6308d62de9f3904d495bc4fa894a90 Mon Sep 17 00:00:00 2001
From: Birte Kristina Friesel <derf@finalrewind.org>
Date: Tue, 28 Nov 2023 21:35:42 +0100
Subject: hafas-m: do not show messages that are irrelevant for --via filter

---
 bin/hafas-m | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'bin')

diff --git a/bin/hafas-m b/bin/hafas-m
index 602f639..f4212dd 100755
--- a/bin/hafas-m
+++ b/bin/hafas-m
@@ -482,6 +482,7 @@ for my $d (@results) {
 
 	for my $message ( $d->messages ) {
 		if ( $message->ref_count > 0 ) {
+			$message->{show} = 1;
 			$info_line = sprintf( '(%d) %s', $message->{id}, $info_line );
 		}
 	}
@@ -523,7 +524,7 @@ for my $d (@results) {
 display_result(@output);
 
 for my $m ( $status->messages ) {
-	if ( $m->ref_count > 0 ) {
+	if ( $m->ref_count > 0 and $m->{show} ) {
 		if ( $m->short ) {
 			printf( "\n# (%d) %s\n# %s\n", $m->{id}, $m->short, $m->text );
 		}
-- 
cgit v1.2.3