diff options
author | Daniel Friesel <derf@finalrewind.org> | 2011-11-28 21:14:04 +0100 |
---|---|---|
committer | Daniel Friesel <derf@finalrewind.org> | 2011-11-28 21:14:04 +0100 |
commit | 107ca44298c6f65ebfc269646e2184d2adba7810 (patch) | |
tree | 0d3bf66981384ee0158da2bc8a87d3551eef9b42 /lib/Travel/Routing/DE/VRR/Route.pm | |
parent | 24a55903ddceb8107c527d637f57f7c1d135ef8e (diff) |
efa: Add -E option to display total route time and ticket class/price
Diffstat (limited to 'lib/Travel/Routing/DE/VRR/Route.pm')
-rw-r--r-- | lib/Travel/Routing/DE/VRR/Route.pm | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/lib/Travel/Routing/DE/VRR/Route.pm b/lib/Travel/Routing/DE/VRR/Route.pm index 73bda07..a4f000b 100644 --- a/lib/Travel/Routing/DE/VRR/Route.pm +++ b/lib/Travel/Routing/DE/VRR/Route.pm @@ -4,10 +4,16 @@ use strict; use warnings; use 5.010; +use parent 'Class::Accessor'; + use Travel::Routing::DE::VRR::Route::Part; our $VERSION = '1.06'; +Travel::Routing::DE::VRR::Route->mk_ro_accessors( + qw(duration ticket_text ticket_type fare_adult fare_child vehicle_time) +); + sub new { my ( $obj, $info, @parts ) = @_; |