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

carriage formatio: show error if unable to retrieve

parent 5e2d5e12
Loading
Loading
Loading
Loading
+6 −0
Original line number Diff line number Diff line
@@ -445,6 +445,12 @@ if ($train_no) {

	my $wr = $status->result;

	if ( not $wr ) {
		say STDERR
"Carriage formation for $train_type $train_no->{train_number} at $station is not available";
		exit 1;
	}

	printf(
		"\n%s → %s\n",
		join( ' / ',