summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorDaniel Friesel <derf@finalrewind.org>2015-05-03 22:47:28 +0200
committerDaniel Friesel <derf@finalrewind.org>2015-05-03 22:47:28 +0200
commit39c390518b75cd191aaeec3eadbffdf394c5d593 (patch)
tree42e0068e16a6c164d7ad2f177a61b9fef2ad685f
parent7bdbf7c77480d17d4a0dbfbc5272c2f54639a662 (diff)
version bump1.04
-rw-r--r--Changelog3
-rwxr-xr-xbin/db-ris4
-rw-r--r--lib/Travel/Status/DE/DeutscheBahn.pm4
-rw-r--r--lib/Travel/Status/DE/DeutscheBahn/Result.pm4
4 files changed, 8 insertions, 7 deletions
diff --git a/Changelog b/Changelog
index 20ae7d0..e01e0f9 100644
--- a/Changelog
+++ b/Changelog
@@ -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
diff --git a/bin/db-ris b/bin/db-ris
index 91c899a..5ba1f16 100755
--- a/bin/db-ris
+++ b/bin/db-ris
@@ -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