From d463bbcd8475dd0261fb28efcc7b4b6d079a27a1 Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Wed, 13 Jul 2011 09:39:29 +0200 Subject: Release v0.03 --- Changelog | 2 +- bin/db-ris | 6 +++--- lib/Travel/Status/DE/DeutscheBahn.pm | 4 ++-- lib/Travel/Status/DE/DeutscheBahn/Result.pm | 4 ++-- 4 files changed, 8 insertions(+), 8 deletions(-) diff --git a/Changelog b/Changelog index 55df95a..d26ffdf 100644 --- a/Changelog +++ b/Changelog @@ -1,4 +1,4 @@ -git HEAD +Travel::Status::DE::DeutscheBahn 0.03 - Wed Jul 13 2011 * Clarify derl dependency (we actually need >= 5.10.1) diff --git a/bin/db-ris b/bin/db-ris index 234a912..f5633b0 100755 --- a/bin/db-ris +++ b/bin/db-ris @@ -3,7 +3,7 @@ use strict; use warnings; use 5.010; -our $VERSION = '0.02'; +our $VERSION = '0.03'; use Getopt::Long qw(:config no_ignore_case); use List::Util qw(first max); @@ -43,7 +43,7 @@ for my $type ( split( qr{,}, $types ) ) { my $status = Travel::Status::DE::DeutscheBahn->new( date => $date, mot => \%train_type, - station => shift, + station => shift || show_help(1), time => $time, ); @@ -171,7 +171,7 @@ B [B<-d> I] [B<-L>] [B<-m> I] [B<-t> I