hafas --list: skip DB

1 files changed, 3 insertions, 0 deletions

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)},