dbris-m: formation request: use $now, handle -m

1 files changed, 3 insertions, 4 deletions

diff --git a/bin/dbris-m b/bin/dbris-m
index b8e9378..c210017 100755
--- a/bin/dbris-m
+++ b/bin/dbris-m
@@ -188,14 +188,13 @@ if ($mots) {
 }
 
 if ( $opt{station} and $train_type and $train_no ) {
-	my $dt = DateTime->now( time_zone => 'Europe/Berlin' )
-	  ->subtract( minutes => 15 );
 	my $status = Travel::Status::DE::DBRIS->new(
 		cache            => $cache,
-		datetime         => $opt{datetime} // $dt,
+		datetime         => $opt{datetime},
 		station          => $opt{station},
 		developer_mode   => $developer_mode,
-		modes_of_transit => [qw[ICE EC_IC IR REGIONAL SBAHN]],
+		modes_of_transit => $opt{modes_of_transit}
+		  // [qw[ICE EC_IC IR REGIONAL SBAHN]],
 	);
 	my $found = 0;
 	for my $train ( $status->results ) {