summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rwxr-xr-xbin/efa-m2
-rw-r--r--lib/Travel/Status/DE/EFA.pm6
2 files changed, 4 insertions, 4 deletions
diff --git a/bin/efa-m b/bin/efa-m
index 10bf498..0bea51f 100755
--- a/bin/efa-m
+++ b/bin/efa-m
@@ -75,7 +75,7 @@ else {
( $place, $input ) = @ARGV;
}
-if ( $input =~ s{ ^ (?<type> address|poi|stop) : }{}x ) {
+if ( $input =~ s{ ^ (?<type> address|poi|stop|stopID) : }{}x ) {
$input_type = $+{type};
}
diff --git a/lib/Travel/Status/DE/EFA.pm b/lib/Travel/Status/DE/EFA.pm
index 25d3e15..e1c8edf 100644
--- a/lib/Travel/Status/DE/EFA.pm
+++ b/lib/Travel/Status/DE/EFA.pm
@@ -34,8 +34,8 @@ sub new {
if ( not( $opt{name} ) ) {
confess('You must specify a name');
}
- if ( $opt{type} and not( $opt{type} ~~ [qw[stop address poi]] ) ) {
- confess('type must be stop, address or poi');
+ if ( $opt{type} and not( $opt{type} ~~ [qw[stop stopID address poi]] ) ) {
+ confess('type must be stop, stopID, address, or poi');
}
if ( not $opt{efa_url} ) {
@@ -706,7 +706,7 @@ E<lt>derf+efa@finalrewind.orgE<gt>.
Name of the place/city
-=item B<type> => B<address>|B<poi>|B<stop>
+=item B<type> => B<address>|B<poi>|B<stop>|B<stopID>
Type of the following I<name>. B<poi> means "point of interest". Defaults to
B<stop> (stop/station name).