From 79d3d039567fbf37e66015efc4a973ba9e8ca272 Mon Sep 17 00:00:00 2001
From: Birte Kristina Friesel <derf@finalrewind.org>
Date: Wed, 8 Jan 2025 18:16:37 +0100
Subject: DB HAFAS (and, thus, ::DeutscheBahn) is no more

---
 lib/Travel/Status/DE/DeutscheBahn.pm | 106 -----------------------------------
 1 file changed, 106 deletions(-)
 delete mode 100644 lib/Travel/Status/DE/DeutscheBahn.pm

(limited to 'lib/Travel/Status/DE/DeutscheBahn.pm')

diff --git a/lib/Travel/Status/DE/DeutscheBahn.pm b/lib/Travel/Status/DE/DeutscheBahn.pm
deleted file mode 100644
index 55a8061..0000000
--- a/lib/Travel/Status/DE/DeutscheBahn.pm
+++ /dev/null
@@ -1,106 +0,0 @@
-package Travel::Status::DE::DeutscheBahn;
-
-use strict;
-use warnings;
-use 5.014;
-
-use parent 'Travel::Status::DE::HAFAS';
-
-our $VERSION = '6.15';
-
-sub new {
-	my ( $class, %opt ) = @_;
-
-	$opt{service} = 'DB';
-
-	return $class->SUPER::new(%opt);
-}
-
-1;
-
-__END__
-
-=head1 NAME
-
-Travel::Status::DE::DeutscheBahn - Interface to the online arrival/departure
-monitor operated by Deutsche Bahn
-
-=head1 SYNOPSIS
-
-	use Travel::Status::DE::DeutscheBahn;
-
-	my $status = Travel::Status::DE::DeutscheBahn->new(
-		station => 'Essen Hbf',
-	);
-
-	if (my $err = $status->errstr) {
-		die("Request error: ${err}\n");
-	}
-
-	for my $departure ($status->results) {
-		printf(
-			"At %s: %s to %s from platform %s\n",
-			$departure->datetime->strftime('%H:%M'),
-			$departure->line,
-			$departure->destination,
-			$departure->platform,
-		);
-	}
-
-=head1 VERSION
-
-version 6.15
-
-=head1 DESCRIPTION
-
-Travel::Status::DE::DeutscheBahn is an interface to the Deutsche Bahn
-departure monitor available at
-L<https://reiseauskunft.bahn.de/bin/mgate.exe>.
-
-It takes a station name and (optional) date and time and reports all arrivals
-or departures at that station starting at the specified point in time (now if
-unspecified).
-
-=head1 METHODS
-
-=over
-
-=item my $status = Travel::Status::DE::DeutscheBahn->new(I<%opts>)
-
-Requests the departures/arrivals as specified by I<opts> and returns a new
-Travel::Status::DE::HAFAS element with the results.  Dies if the wrong
-I<opts> were passed.
-
-Calls Travel::Status::DE::HAFAS->new with service = DB. All I<opts> are passed
-on. Please see Travel::Status::DE::HAFAS(3pm) for I<opts> documentation
-and other methdos.
-
-=back
-
-=head1 DIAGNOSTICS
-
-See Travel::Status::DE::HAFAS(3pm).
-
-=head1 DEPENDENCIES
-
-=over
-
-=item * Travel::Status::DE::HAFAS(3pm)
-
-=back
-
-=head1 BUGS AND LIMITATIONS
-
-See Travel::Status::DE::HAFAS(3pm).
-
-=head1 SEE ALSO
-
-Travel::Status::DE::HAFAS(3pm).
-
-=head1 AUTHOR
-
-Copyright (C) 2015-2022 by Birte Kristina Friesel E<lt>derf@finalrewind.orgE<gt>
-
-=head1 LICENSE
-
-This module is licensed under the same terms as Perl itself.
-- 
cgit v1.2.3