From 0dfa9cfe9f1a607b14f99897239d7ce2f8698b91 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Sat, 31 Oct 2015 11:32:47 +0100 Subject: release v1.0 \o/ --- Build.PL | 1 + Changelog | 7 +++++++ bin/aseag-m | 6 +++--- lib/Travel/Status/DE/ASEAG.pm | 4 ++-- lib/Travel/Status/DE/URA.pm | 6 +++--- lib/Travel/Status/DE/URA/Result.pm | 4 ++-- lib/Travel/Status/DE/URA/Stop.pm | 4 ++-- 7 files changed, 20 insertions(+), 12 deletions(-) diff --git a/Build.PL b/Build.PL index 318b65d..72650a9 100644 --- a/Build.PL +++ b/Build.PL @@ -10,6 +10,7 @@ Module::Build->new( 'File::Slurp' => 0, 'Test::More' => 0, 'Test::Pod' => 0, + 'Test::Fatal' => 0, }, configure_requires => { 'Module::Build' => 0.40, diff --git a/Changelog b/Changelog index a386caf..afa8476 100644 --- a/Changelog +++ b/Changelog @@ -1,3 +1,10 @@ +Travel::Status::DE::URA 1.00 - Sat Oct 31 2015 + + * Reduce memory footprint + * aseag-m: -of: Show delimiter between route before and after the + requseted stop + * aseag-m: Do not erroneously reverse stop list when combining -oa and -ob + Travel::Status::DE::URA 0.05 - Mon Oct 12 2015 * aseag-m: Rename -a / -b / -f / -r to -oa / -ob / -of / -oT diff --git a/bin/aseag-m b/bin/aseag-m index 947db81..695f96e 100755 --- a/bin/aseag-m +++ b/bin/aseag-m @@ -5,7 +5,7 @@ use 5.010; no if $] >= 5.018, warnings => 'experimental::smartmatch'; -our $VERSION = '0.05'; +our $VERSION = '1.00'; binmode( STDOUT, ':encoding(utf-8)' ); @@ -182,7 +182,7 @@ sub show_results { @route = ( show_route( $dt_now, $dt_format, $d->route_pre ), [ ' - - - -', q{}, q{}, q{} ], - show_route( $dt_now, $dt_format, $d->route_post ) + show_route( $dt_now, $dt_format, $d->route_post ), ); } elsif ( $edata{route_after} ) { @@ -247,7 +247,7 @@ B [B<-pV>] [B<-l> I] [B<-o> I] =head1 VERSION -version 0.05 +version 1.00 =head1 DESCRIPTION diff --git a/lib/Travel/Status/DE/ASEAG.pm b/lib/Travel/Status/DE/ASEAG.pm index 6dc3078..daabee5 100644 --- a/lib/Travel/Status/DE/ASEAG.pm +++ b/lib/Travel/Status/DE/ASEAG.pm @@ -6,7 +6,7 @@ use 5.010; no if $] >= 5.018, warnings => 'experimental::smartmatch'; -our $VERSION = '0.05'; +our $VERSION = '1.00'; use parent 'Travel::Status::DE::URA'; @@ -44,7 +44,7 @@ Travel::Status::DE::ASEAG - unofficial ASEAG departure monitor. =head1 VERSION -version 0.05 +version 1.00 =head1 DESCRIPTION diff --git a/lib/Travel/Status/DE/URA.pm b/lib/Travel/Status/DE/URA.pm index c76843e..dec1a9b 100644 --- a/lib/Travel/Status/DE/URA.pm +++ b/lib/Travel/Status/DE/URA.pm @@ -6,7 +6,7 @@ use 5.010; no if $] >= 5.018, warnings => 'experimental::smartmatch'; -our $VERSION = '0.05'; +our $VERSION = '1.00'; use Carp qw(confess cluck); use DateTime; @@ -81,7 +81,7 @@ sub new { } sub parse_raw_data { - my ($self, $raw_str) = @_; + my ( $self, $raw_str ) = @_; my $csv = Text::CSV->new( { binary => 1 } ); for my $dep ( split( /\r\n/, $raw_str ) ) { @@ -264,7 +264,7 @@ API" data providers (e.g. ASEAG) =head1 VERSION -version 0.05 +version 1.00 =head1 DESCRIPTION diff --git a/lib/Travel/Status/DE/URA/Result.pm b/lib/Travel/Status/DE/URA/Result.pm index 0bda4c3..3eca0fd 100644 --- a/lib/Travel/Status/DE/URA/Result.pm +++ b/lib/Travel/Status/DE/URA/Result.pm @@ -8,7 +8,7 @@ use parent 'Class::Accessor'; use DateTime::Format::Duration; -our $VERSION = '0.05'; +our $VERSION = '1.00'; Travel::Status::DE::URA::Result->mk_ro_accessors( qw(datetime destination line line_id stop stop_id)); @@ -144,7 +144,7 @@ departure received by Travel::Status::DE::URA =head1 VERSION -version 0.05 +version 1.00 =head1 DESCRIPTION diff --git a/lib/Travel/Status/DE/URA/Stop.pm b/lib/Travel/Status/DE/URA/Stop.pm index 0496710..2a9b419 100644 --- a/lib/Travel/Status/DE/URA/Stop.pm +++ b/lib/Travel/Status/DE/URA/Stop.pm @@ -6,7 +6,7 @@ use 5.010; use parent 'Class::Accessor'; -our $VERSION = '0.05'; +our $VERSION = '1.00'; Travel::Status::DE::URA::Stop->mk_ro_accessors(qw(datetime name)); @@ -55,7 +55,7 @@ Travel::Status::DE::URA::Stop - Information about a stop =head1 VERSION -version 0.05 +version 1.00 =head1 DESCRIPTION -- cgit v1.2.3