summaryrefslogtreecommitdiff
path: root/lib/Travel/Status/DE/HAFAS.pm
diff options
context:
space:
mode:
authorDaniel Friesel <derf@finalrewind.org>2015-09-11 18:22:34 +0200
committerDaniel Friesel <derf@finalrewind.org>2015-09-11 18:22:34 +0200
commitde432ead84057a6f9234cbcb56004d625333a7bd (patch)
tree3d86faf387f42e05f0c6cf329031ae820e476d0d /lib/Travel/Status/DE/HAFAS.pm
parent53a32113d048c2ab7b98771ae23e470d562bb40a (diff)
add -m help / -m list support
Diffstat (limited to 'lib/Travel/Status/DE/HAFAS.pm')
-rw-r--r--lib/Travel/Status/DE/HAFAS.pm9
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} } };