diff options
| -rw-r--r-- | Changelog | 3 | ||||
| -rwxr-xr-x | bin/db-ris | 4 | ||||
| -rw-r--r-- | lib/Travel/Status/DE/DeutscheBahn.pm | 4 | ||||
| -rw-r--r-- | lib/Travel/Status/DE/DeutscheBahn/Result.pm | 4 |
4 files changed, 8 insertions, 7 deletions
@@ -1,5 +1,6 @@ -git HEAD +Travel::Status::DE::DeutscheBahn 1.04 - Sun May 03 2015 + * Result: Add type accessor * DeutscheBahn->new: Add lwp_options parameter to pass options to LWP::UserAgent->new @@ -3,7 +3,7 @@ use strict; use warnings; use 5.010; -our $VERSION = '1.03'; +our $VERSION = '1.04'; use Getopt::Long qw(:config no_ignore_case); use List::Util qw(first max); @@ -147,7 +147,7 @@ B<db-ris> [B<-a>] [B<-d> I<date>] [B<-L>] [B<-m> I<motlist>] [B<-t> I<time>] =head1 VERSION -version 1.03 +version 1.04 =head1 DESCRIPTION diff --git a/lib/Travel/Status/DE/DeutscheBahn.pm b/lib/Travel/Status/DE/DeutscheBahn.pm index 0a40b3b..b3170e0 100644 --- a/lib/Travel/Status/DE/DeutscheBahn.pm +++ b/lib/Travel/Status/DE/DeutscheBahn.pm @@ -12,7 +12,7 @@ use POSIX qw(strftime); use Travel::Status::DE::DeutscheBahn::Result; use XML::LibXML; -our $VERSION = '1.03'; +our $VERSION = '1.04'; sub new { my ( $obj, %conf ) = @_; @@ -288,7 +288,7 @@ arrival/departure monitor =head1 VERSION -version 1.03 +version 1.04 =head1 DESCRIPTION diff --git a/lib/Travel/Status/DE/DeutscheBahn/Result.pm b/lib/Travel/Status/DE/DeutscheBahn/Result.pm index 1f9f81c..ca61194 100644 --- a/lib/Travel/Status/DE/DeutscheBahn/Result.pm +++ b/lib/Travel/Status/DE/DeutscheBahn/Result.pm @@ -8,7 +8,7 @@ no if $] >= 5.018, warnings => "experimental::smartmatch"; use parent 'Class::Accessor'; -our $VERSION = '1.03'; +our $VERSION = '1.04'; Travel::Status::DE::DeutscheBahn::Result->mk_ro_accessors( qw(date time train route_end route_raw platform info_raw)); @@ -180,7 +180,7 @@ arrival/departure received by Travel::Status::DE::DeutscheBahn =head1 VERSION -version 1.03 +version 1.04 =head1 DESCRIPTION |