From 068f7ba6eac35b1b6d34e177015c726a9c876d24 Mon Sep 17 00:00:00 2001 From: Birte Kristina Friesel Date: Mon, 13 Jan 2025 18:14:01 +0100 Subject: hafas --list: skip DB --- bin/hafas | 3 +++ 1 file changed, 3 insertions(+) (limited to 'bin') diff --git a/bin/hafas b/bin/hafas index 398e05a..fc525cf 100755 --- a/bin/hafas +++ b/bin/hafas @@ -72,6 +72,9 @@ GetOptions( if ($list_services) { printf( "%-40s %-14s %s\n\n", 'operator', 'abbr. (-s)', 'languages (-l)' ); for my $service ( Travel::Routing::DE::HAFAS::get_services() ) { + if ( $service->{shortname} eq 'DB' ) { + next; + } printf( "%-40s %-14s %s\n", @{$service}{qw(name shortname)}, -- cgit v1.2.3