Commit 6ddf48b7 authored by Birte Kristina Friesel's avatar Birte Kristina Friesel
Browse files

full-route: improve output

parent 98c8f19f

bin/efa-m

+9 −1
Original line number Diff line number Diff line
@@ -91,7 +91,15 @@ sub format_route { 
			say "BUG";

			next;

		}

		if ( $stop->{arr_time} eq $stop->{dep_time} ) {

		if ( not defined $stop->{arr_time} ) {

			$output .= sprintf( "        %5s  %40s %s\n",

				$stop->{dep_time}, $stop->{stop}, $stop->{platform}, );

		}

		elsif (not defined $stop->{dep_time}) {

			$output .= sprintf( "%5s          %40s %s\n",

				$stop->{arr_time}, $stop->{stop}, $stop->{platform}, );

		}

		elsif ( $stop->{arr_time} eq $stop->{dep_time} ) {

			$output .= sprintf( "    %5s      %40s %s\n",

				$stop->{dep_time}, $stop->{stop}, $stop->{platform}, );

		}

lib/Travel/Status/DE/EFA.pm

+8 −0
Original line number Diff line number Diff line
@@ -162,6 +162,10 @@ sub errstr { 
sub sprintf_date {

	my ($e) = @_;



	if ($e->getAttribute('day') == -1) {

		return undef;

	}



	return sprintf( '%02d.%02d.%d',

		$e->getAttribute('day'),

		$e->getAttribute('month'),
@@ -172,6 +176,10 @@ sub sprintf_date { 
sub sprintf_time {

	my ($e) = @_;



	if ($e->getAttribute('minute') == -1) {

		return undef;

	}



	return sprintf( '%02d:%02d',

		$e->getAttribute('hour'),

		$e->getAttribute('minute'),