Commit 9d741794 authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

dbris-m: only print identified station name if it differs from input

parent d96a5775

bin/dbris-m

+3 −1
Original line number Diff line number Diff line
@@ -94,8 +94,10 @@ elsif ( $opt{station} !~ m{ ^ \d+ $ }x ) { 
	}

	my $found;

	for my $result ( $status->results ) {

		say $result->name;

		if ( defined $result->eva ) {

			if ( lc( $result->name ) ne lc( $opt{station} ) ) {

				say $result->name;

			}

			$opt{station} = $result;

			$found = 1;

			last;