diff options
| author | Birte Kristina Friesel <derf@finalrewind.org> | 2024-09-25 21:29:00 +0200 |
|---|---|---|
| committer | Birte Kristina Friesel <derf@finalrewind.org> | 2024-09-25 21:29:00 +0200 |
| commit | 385b25b93a3f10a4044df9fc73027b8ae70dbc8a (patch) | |
| tree | 60f95792aefe21c97766dfc0fafd0f7715fc2078 /lib/Travel/Status/DE/EFA.pm | |
| parent | 28ba9a1b23beb2121ff1b57d6139be70a3d808b4 (diff) | |
add primitive stopseq output
TODO: Proper classes, locality/parent handling, et cetera
Diffstat (limited to 'lib/Travel/Status/DE/EFA.pm')
| -rw-r--r-- | lib/Travel/Status/DE/EFA.pm | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/lib/Travel/Status/DE/EFA.pm b/lib/Travel/Status/DE/EFA.pm index 85aea8e..8591bc1 100644 --- a/lib/Travel/Status/DE/EFA.pm +++ b/lib/Travel/Status/DE/EFA.pm @@ -15,6 +15,7 @@ use JSON; use Travel::Status::DE::EFA::Line; use Travel::Status::DE::EFA::Departure; use Travel::Status::DE::EFA::Stop; +use Travel::Status::DE::EFA::Trip; use LWP::UserAgent; my %efa_instance = ( @@ -568,6 +569,12 @@ sub results { return @results; } +sub result { + my ($self) = @_; + + return Travel::Status::DE::EFA::Trip->new( json => $self->{response} ); +} + # static sub get_efa_urls { return map { |