From a201b41bbfffaf32407afe522829654e2dd93674 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Thu, 2 Jan 2014 02:37:20 +0100 Subject: Add --efa-url option to efa-m --- lib/Travel/Status/DE/EFA.pm | 9 ++++++--- lib/Travel/Status/DE/EFA/Line.pm | 6 +++--- lib/Travel/Status/DE/EFA/Result.pm | 10 +++++----- lib/Travel/Status/DE/VRR.pm | 8 ++++---- 4 files changed, 18 insertions(+), 15 deletions(-) (limited to 'lib/Travel/Status/DE') diff --git a/lib/Travel/Status/DE/EFA.pm b/lib/Travel/Status/DE/EFA.pm index a8c4c83..fc6f0dc 100644 --- a/lib/Travel/Status/DE/EFA.pm +++ b/lib/Travel/Status/DE/EFA.pm @@ -6,7 +6,7 @@ use 5.010; no if $] >= 5.018, warnings => "experimental::smartmatch"; -our $VERSION = '1.05'; +our $VERSION = '1.06'; use Carp qw(confess cluck); use Encode qw(encode decode); @@ -389,7 +389,7 @@ Travel::Status::DE::EFA - unofficial EFA departure monitor =head1 VERSION -version 1.05 +version 1.06 =head1 DESCRIPTION @@ -425,6 +425,9 @@ URL to the EFA service. Known URLs are: =back +If you found a URL not listed here, please send it to +Ederf@finalrewind.orgE. + =item B => I Name of the place/city @@ -483,7 +486,7 @@ efa-m(1), Travel::Status::DE::EFA::Result(3pm). =head1 AUTHOR -Copyright (C) 2011 by Daniel Friesel Ederf@finalrewind.orgE +Copyright (C) 2011-2014 by Daniel Friesel Ederf@finalrewind.orgE =head1 LICENSE diff --git a/lib/Travel/Status/DE/EFA/Line.pm b/lib/Travel/Status/DE/EFA/Line.pm index 8a22fe8..c836b49 100644 --- a/lib/Travel/Status/DE/EFA/Line.pm +++ b/lib/Travel/Status/DE/EFA/Line.pm @@ -6,7 +6,7 @@ use 5.010; use parent 'Class::Accessor'; -our $VERSION = '1.05'; +our $VERSION = '1.06'; Travel::Status::DE::EFA::Line->mk_ro_accessors( qw(direction name operator route type valid)); @@ -46,7 +46,7 @@ requested station =head1 VERSION -version 1.05 +version 1.06 =head1 DESCRIPTION @@ -130,7 +130,7 @@ Travel::Status::DE::EFA(3pm). =head1 AUTHOR -Copyright (C) 2011 by Daniel Friesel Ederf@finalrewind.orgE +Copyright (C) 2011-2014 by Daniel Friesel Ederf@finalrewind.orgE =head1 LICENSE diff --git a/lib/Travel/Status/DE/EFA/Result.pm b/lib/Travel/Status/DE/EFA/Result.pm index c623f6e..aac67cd 100644 --- a/lib/Travel/Status/DE/EFA/Result.pm +++ b/lib/Travel/Status/DE/EFA/Result.pm @@ -6,7 +6,7 @@ use 5.010; use parent 'Class::Accessor'; -our $VERSION = '1.05'; +our $VERSION = '1.06'; Travel::Status::DE::EFA::Result->mk_ro_accessors( qw(countdown date delay destination is_cancelled info key line lineref platform @@ -18,8 +18,8 @@ sub new { my $ref = \%conf; - if ($ref->{delay} eq '-9999') { - $ref->{delay} = 0; + if ( $ref->{delay} eq '-9999' ) { + $ref->{delay} = 0; $ref->{is_cancelled} = 1; } else { @@ -56,7 +56,7 @@ departure received by Travel::Status::DE::EFA =head1 VERSION -version 1.05 +version 1.06 =head1 DESCRIPTION @@ -218,7 +218,7 @@ Travel::Status::DE::EFA(3pm). =head1 AUTHOR -Copyright (C) 2011 by Daniel Friesel Ederf@finalrewind.orgE +Copyright (C) 2011-2014 by Daniel Friesel Ederf@finalrewind.orgE =head1 LICENSE diff --git a/lib/Travel/Status/DE/VRR.pm b/lib/Travel/Status/DE/VRR.pm index 23ee381..d793538 100644 --- a/lib/Travel/Status/DE/VRR.pm +++ b/lib/Travel/Status/DE/VRR.pm @@ -6,7 +6,7 @@ use 5.010; no if $] >= 5.018, warnings => "experimental::smartmatch"; -our $VERSION = '0.00'; +our $VERSION = '1.06'; use parent 'Travel::Status::DE::EFA'; @@ -44,7 +44,7 @@ Travel::Status::DE::VRR - unofficial VRR departure monitor. =head1 VERSION -version 0.00 +version 1.06 =head1 DESCRIPTION @@ -92,11 +92,11 @@ Many. =head1 SEE ALSO -aseag-m(1), Travel::Status::DE::EFA(3pm). +efa-m(1), Travel::Status::DE::EFA(3pm). =head1 AUTHOR -Copyright (C) 2013 by Daniel Friesel Ederf@finalrewind.orgE +Copyright (C) 2013-2014 by Daniel Friesel Ederf@finalrewind.orgE =head1 LICENSE -- cgit v1.2.3