Loading bin/dbris-m +2 −1 Original line number Diff line number Diff line Loading @@ -151,7 +151,8 @@ my $status = Travel::Status::DE::DBRIS->new(%opt); sub show_help { my ($code) = @_; print "Usage: db-ris-m <station|lat:lon>\n" . "See also: man dbris-m\n"; print "Usage: db-ris-m [-j] <station|journeyID|lat:lon>\n" . "See also: man dbris-m\n"; exit $code; } Loading Loading
bin/dbris-m +2 −1 Original line number Diff line number Diff line Loading @@ -151,7 +151,8 @@ my $status = Travel::Status::DE::DBRIS->new(%opt); sub show_help { my ($code) = @_; print "Usage: db-ris-m <station|lat:lon>\n" . "See also: man dbris-m\n"; print "Usage: db-ris-m [-j] <station|journeyID|lat:lon>\n" . "See also: man dbris-m\n"; exit $code; } Loading