diff options
Diffstat (limited to 'lib/Travel/Status/DE/HAFAS.pm')
-rw-r--r-- | lib/Travel/Status/DE/HAFAS.pm | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/lib/Travel/Status/DE/HAFAS.pm b/lib/Travel/Status/DE/HAFAS.pm index b47c2fe..8cf03e3 100644 --- a/lib/Travel/Status/DE/HAFAS.pm +++ b/lib/Travel/Status/DE/HAFAS.pm @@ -237,7 +237,16 @@ sub get_services { return @services; } +# static sub get_service { + my ($service) = @_; + + $service //= 'DB'; + + return $hafas_instance{$service}; +} + +sub get_active_service { my ($self) = @_; return %{ $hafas_instance{ $self->{active_service} } }; |