From 77bd89ceaacff18a0737ba96a444fc6b00d35d5c Mon Sep 17 00:00:00 2001 From: Daniel Friesel Date: Mon, 18 Apr 2016 16:35:00 +0200 Subject: Result: Add platform accessor (shortcut for stop_indicator) --- lib/Travel/Status/DE/URA/Result.pm | 10 ++++++++++ 1 file changed, 10 insertions(+) (limited to 'lib/Travel') diff --git a/lib/Travel/Status/DE/URA/Result.pm b/lib/Travel/Status/DE/URA/Result.pm index e638e89..91f2d67 100644 --- a/lib/Travel/Status/DE/URA/Result.pm +++ b/lib/Travel/Status/DE/URA/Result.pm @@ -46,6 +46,12 @@ sub date { return $self->datetime->strftime('%d.%m.%Y'); } +sub platform { + my ($self) = @_; + + return $self->{stop_indicator}; +} + sub time { my ($self) = @_; @@ -188,6 +194,10 @@ The name of the line. The number of the line. +=item $departure->platform + +Shortcut for $departure->stop_indicator, see there. + =item $departure->route_interesting(I) If the B method of Travel::Status::DE::URA(3pm) was called with -- cgit v1.2.3