summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--Changelog6
-rwxr-xr-xbin/db-iris4
-rw-r--r--lib/Travel/Status/DE/IRIS.pm4
-rw-r--r--lib/Travel/Status/DE/IRIS/Result.pm4
-rw-r--r--lib/Travel/Status/DE/IRIS/Stations.pm2
5 files changed, 13 insertions, 7 deletions
diff --git a/Changelog b/Changelog
index ec92216..d0ba2af 100644
--- a/Changelog
+++ b/Changelog
@@ -1,3 +1,9 @@
+Travel::Status::DE::IRIS 1.33 - Sat Oct 05 2019
+
+ * Fix $result->route_pre / route_post accessors providing bogus data
+ when all previous/following stops are cancelled. They used to return
+ sched_route_pre / sched_route_post instead of an empty list in this case.
+
Travel::Status::DE::IRIS 1.32 - Thu Aug 22 2019
* Travel::Status::DE::IRIS::Stations: Add geocoordinates fo some swiss
diff --git a/bin/db-iris b/bin/db-iris
index 108adb8..082681f 100755
--- a/bin/db-iris
+++ b/bin/db-iris
@@ -6,7 +6,7 @@ use utf8;
no if $] >= 5.018, warnings => 'experimental::smartmatch';
-our $VERSION = '1.32';
+our $VERSION = '1.33';
use DateTime;
use DateTime::Format::Strptime;
@@ -533,7 +533,7 @@ B<db-iris> [B<-rx>] [B<-d> I<date>] [B<-o> I<output-flags>]
=head1 VERSION
-version 1.32
+version 1.33
=head1 DESCRIPTION
diff --git a/lib/Travel/Status/DE/IRIS.pm b/lib/Travel/Status/DE/IRIS.pm
index e3073a6..e1b7410 100644
--- a/lib/Travel/Status/DE/IRIS.pm
+++ b/lib/Travel/Status/DE/IRIS.pm
@@ -6,7 +6,7 @@ use 5.014;
no if $] >= 5.018, warnings => 'experimental::smartmatch';
-our $VERSION = '1.32';
+our $VERSION = '1.33';
use Carp qw(confess cluck);
use DateTime;
@@ -614,7 +614,7 @@ Travel::Status::DE::IRIS - Interface to IRIS based web departure monitors.
=head1 VERSION
-version 1.32
+version 1.33
=head1 DESCRIPTION
diff --git a/lib/Travel/Status/DE/IRIS/Result.pm b/lib/Travel/Status/DE/IRIS/Result.pm
index 17692ce..a9aae85 100644
--- a/lib/Travel/Status/DE/IRIS/Result.pm
+++ b/lib/Travel/Status/DE/IRIS/Result.pm
@@ -15,7 +15,7 @@ use List::Compare;
use List::MoreUtils qw(none uniq firstval);
use Scalar::Util qw(weaken);
-our $VERSION = '1.32';
+our $VERSION = '1.33';
my %translation = (
2 => 'Polizeiliche Ermittlung',
@@ -820,7 +820,7 @@ arrival/departure received by Travel::Status::DE::IRIS
=head1 VERSION
-version 1.32
+version 1.33
=head1 DESCRIPTION
diff --git a/lib/Travel/Status/DE/IRIS/Stations.pm b/lib/Travel/Status/DE/IRIS/Stations.pm
index 74b9634..4344887 100644
--- a/lib/Travel/Status/DE/IRIS/Stations.pm
+++ b/lib/Travel/Status/DE/IRIS/Stations.pm
@@ -17,7 +17,7 @@ use Text::LevenshteinXS qw(distance);
# TODO switch to Text::Levenshtein::XS once AUR/Debian packages become available
-our $VERSION = '1.32';
+our $VERSION = '1.33';
my @stations = (