Skip to content
Commits on Source (3)
Hide whitespace changes
Inline Side-by-side
Changelog
View file @ 87307caf
git HEAD
Travel::Status::DE::VRR 2.00 - Sun Dec 03 2023
* New dependency: DateTime
* Result: Add datetime, sched_datetime, rt_datetime accessors.
......
bin/efa-m
View file @ 87307caf
......@@ -4,7 +4,7 @@ use warnings;
use 5.010;
use utf8;
our $VERSION = '1.24';
our $VERSION = '2.00';
binmode( STDOUT, ':encoding(utf-8)' );
......@@ -426,7 +426,7 @@ B<efa-m> [B<-Lr>] [B<-d> I<dd.mm.yyyy>] [B<-t> I<hh:mm>]
=head1 VERSION
version 1.24
version 2.00
=head1 DESCRIPTION
......@@ -638,7 +638,7 @@ departure and departure delay
=head1 AUTHOR
Copyright (C) 2011-2021 by Birte Kristina Friesel E<lt>derf@finalrewind.orgE<gt>
Copyright (C) 2011-2023 by Birte Kristina Friesel E<lt>derf@finalrewind.orgE<gt>
=head1 LICENSE
......
lib/Travel/Status/DE/EFA.pm
View file @ 87307caf
......@@ -5,7 +5,7 @@ use warnings;
use 5.010;
use utf8;
our $VERSION = '1.24';
our $VERSION = '2.00';
use Carp qw(confess cluck);
use DateTime;
......@@ -658,13 +658,14 @@ Travel::Status::DE::EFA - unofficial EFA departure monitor
for my $d ($status->results) {
printf(
"%s %-8s %-5s %s\n",
$d->time, $d->platform_name, $d->line, $d->destination
$d->datetime->strftime('%H:%M'),
$d->platform_name, $d->line, $d->destination
);
}
=head1 VERSION
version 1.24
version 2.00
=head1 DESCRIPTION
......
lib/Travel/Status/DE/EFA/Line.pm
View file @ 87307caf
......@@ -6,7 +6,7 @@ use 5.010;
use parent 'Class::Accessor';
our $VERSION = '1.24';
our $VERSION = '2.00';
Travel::Status::DE::EFA::Line->mk_ro_accessors(
qw(direction mot name operator route type valid));
......@@ -57,7 +57,7 @@ requested station
=head1 VERSION
version 1.24
version 2.00
=head1 DESCRIPTION
......@@ -151,7 +151,7 @@ Travel::Status::DE::EFA(3pm).
=head1 AUTHOR
Copyright (C) 2011-2015 by Birte Kristina Friesel E<lt>derf@finalrewind.orgE<gt>
Copyright (C) 2011-2023 by Birte Kristina Friesel E<lt>derf@finalrewind.orgE<gt>
=head1 LICENSE
......
lib/Travel/Status/DE/EFA/Result.pm
View file @ 87307caf
......@@ -6,7 +6,7 @@ use 5.010;
use parent 'Class::Accessor';
our $VERSION = '1.24';
our $VERSION = '2.00';
Travel::Status::DE::EFA::Result->mk_ro_accessors(
qw(countdown datetime delay destination is_cancelled info key line lineref
......@@ -136,7 +136,7 @@ departure received by Travel::Status::DE::EFA
=head1 VERSION
version 1.24
version 2.00
=head1 DESCRIPTION
......@@ -341,7 +341,7 @@ Travel::Status::DE::EFA(3pm).
=head1 AUTHOR
Copyright (C) 2011-2015 by Birte Kristina Friesel E<lt>derf@finalrewind.orgE<gt>
Copyright (C) 2011-2023 by Birte Kristina Friesel E<lt>derf@finalrewind.orgE<gt>
=head1 LICENSE
......
lib/Travel/Status/DE/EFA/Stop.pm
View file @ 87307caf
......@@ -6,7 +6,7 @@ use 5.010;
use parent 'Class::Accessor';
our $VERSION = '1.24';
our $VERSION = '2.00';
Travel::Status::DE::EFA::Stop->mk_ro_accessors(
qw(arr dep name name_suf platform));
......@@ -47,7 +47,7 @@ in a Travel::Status::DE::EFA::Result's route
=head1 VERSION
version 1.24
version 2.00
=head1 DESCRIPTION
......@@ -123,7 +123,7 @@ Travel::Status::DE::EFA(3pm).
=head1 AUTHOR
Copyright (C) 2015 by Birte Kristina Friesel E<lt>derf@finalrewind.orgE<gt>
Copyright (C) 2015-2023 by Birte Kristina Friesel E<lt>derf@finalrewind.orgE<gt>
=head1 LICENSE
......
lib/Travel/Status/DE/VRR.pm
View file @ 87307caf
......@@ -4,7 +4,7 @@ use strict;
use warnings;
use 5.010;
our $VERSION = '1.24';
our $VERSION = '2.00';
use parent 'Travel::Status::DE::EFA';
......@@ -35,14 +35,15 @@ Travel::Status::DE::VRR - unofficial VRR departure monitor.
for my $d ($status->results) {
printf(
"%s %d %-5s %s\n",
$d->time, $d->platform, $d->line, $d->destination
$d->datetime->strftime('%H:%M'),
$d->platform, $d->line, $d->destination
);
}
=head1 VERSION
version 1.24
version 2.00
=head1 DESCRIPTION
......@@ -94,7 +95,7 @@ efa-m(1), Travel::Status::DE::EFA(3pm).
=head1 AUTHOR
Copyright (C) 2013-2015 by Birte Kristina Friesel E<lt>derf@finalrewind.orgE<gt>
Copyright (C) 2013-2023 by Birte Kristina Friesel E<lt>derf@finalrewind.orgE<gt>
=head1 LICENSE
......