From 43f83fc7df3a563521af01dd1251ddd8e8d21d3a Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Sun, 11 Sep 2011 13:17:12 +0200 Subject: Add initial support for additional departure information --- lib/Travel/Status/DE/VRR/Result.pm | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) (limited to 'lib/Travel/Status/DE/VRR/Result.pm') diff --git a/lib/Travel/Status/DE/VRR/Result.pm b/lib/Travel/Status/DE/VRR/Result.pm index 083e225..c5b74ff 100644 --- a/lib/Travel/Status/DE/VRR/Result.pm +++ b/lib/Travel/Status/DE/VRR/Result.pm @@ -9,7 +9,7 @@ use parent 'Class::Accessor'; our $VERSION = '0.00'; Travel::Status::DE::VRR::Result->mk_ro_accessors( - qw(destination time platform line)); + qw(destination time platform line info)); sub new { my ( $obj, %conf ) = @_; @@ -57,6 +57,12 @@ line number and destination. The tram/bus/train destination. +=item $departure->info + +Additional information related to the departure (string). If departures for +an address were requested, this is the stop name, otherwise it may be recent +news related to the line's schedule. + =item $departure->line The name/number of the line. -- cgit v1.2.3