diff options
| -rw-r--r-- | Changelog | 10 | ||||
| -rwxr-xr-x | bin/db-iris | 4 | ||||
| -rw-r--r-- | lib/Travel/Status/DE/IRIS.pm | 4 | ||||
| -rw-r--r-- | lib/Travel/Status/DE/IRIS/Result.pm | 4 | ||||
| -rw-r--r-- | lib/Travel/Status/DE/IRIS/Stations.pm | 2 |
5 files changed, 17 insertions, 7 deletions
@@ -1,3 +1,13 @@ +Travel::Status::DE::IRIS 1.23 - Sat Dec 29 2018 + + * Ignore apparently useless "ZOB" (central omnibus station) links at most + main stations. This decreases the average runtime and also fixes + some S-Bahn trains being reported twice in München Hbf. + * Result->qos_messages: Skip superseded messages. They're still present in + ->messages. + * Result->route_interesting: Filter Hbf suffixes (not just "Hbf"); include + .hl.n (czech main station). + Travel::Status::DE::IRIS 1.22 - Sun Dec 16 2018 * Add delay code 4 (unforeseen staff shortage, thanks to Fabian Schwarz) diff --git a/bin/db-iris b/bin/db-iris index 5ed19cd..64d7aef 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.22'; +our $VERSION = '1.23'; 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.22 +version 1.23 =head1 DESCRIPTION diff --git a/lib/Travel/Status/DE/IRIS.pm b/lib/Travel/Status/DE/IRIS.pm index db96b21..803ab38 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.22'; +our $VERSION = '1.23'; use Carp qw(confess cluck); use DateTime; @@ -610,7 +610,7 @@ Travel::Status::DE::IRIS - Interface to IRIS based web departure monitors. =head1 VERSION -version 1.22 +version 1.23 =head1 DESCRIPTION diff --git a/lib/Travel/Status/DE/IRIS/Result.pm b/lib/Travel/Status/DE/IRIS/Result.pm index f21fd45..adba3c1 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.22'; +our $VERSION = '1.23'; my %translation = ( 2 => 'Polizeiliche Ermittlung', @@ -809,7 +809,7 @@ arrival/departure received by Travel::Status::DE::IRIS =head1 VERSION -version 1.22 +version 1.23 =head1 DESCRIPTION diff --git a/lib/Travel/Status/DE/IRIS/Stations.pm b/lib/Travel/Status/DE/IRIS/Stations.pm index 4206a8e..30743ab 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.22'; +our $VERSION = '1.23'; my @stations = ( |