Unverified Commit bdfd939b authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

dbris-m: trailing @ is optional for short station codes

parent 7179c65a

bin/dbris-m

+1 −1
Original line number Diff line number Diff line
@@ -107,7 +107,7 @@ elsif ( $opt{station} =~ m{[|]} ) { 
	$opt{with_polyline} = $with_polyline;

	delete $opt{station};

}

elsif ( $opt{station} =~ m{ [@] L = (?<eva> \d+ ) [@] }x ) {

elsif ( $opt{station} =~ m{ [@] L = (?<eva> \d+ ) }x ) {

	$opt{station} = {

		eva => $+{eva},

		id  => $opt{station},