summaryrefslogtreecommitdiff
path: root/lib
diff options
context:
space:
mode:
Diffstat (limited to 'lib')
-rw-r--r--lib/DBInfoscreen/Helper/HAFAS.pm10
1 files changed, 10 insertions, 0 deletions
diff --git a/lib/DBInfoscreen/Helper/HAFAS.pm b/lib/DBInfoscreen/Helper/HAFAS.pm
index 91661a2..31615b1 100644
--- a/lib/DBInfoscreen/Helper/HAFAS.pm
+++ b/lib/DBInfoscreen/Helper/HAFAS.pm
@@ -186,6 +186,16 @@ sub get_xml_p {
my $header = $message->getAttribute('header');
my $lead = $message->getAttribute('lead');
my $display = $message->getAttribute('display');
+
+ # "something is wrong, but we're not telling what" is not helpful.
+ # Observed on RRX lines in NRW
+ if ( $header
+ =~ m{ : \s St..?rung. \s \(Quelle: \s zuginfo.nrw \) $ }x
+ and not $lead )
+ {
+ next;
+ }
+
push(
@{ $ret->{messages} },
{