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

Update DBWagenreihung usage for v0.13

parent dd1b29bc

cpanfile

+1 −1
Original line number Diff line number Diff line
@@ -10,7 +10,7 @@ requires 'List::UtilsBy'; 
requires 'LWP::UserAgent';

requires 'LWP::Protocol::https';

requires 'Mojolicious';

requires 'Travel::Status::DE::DBWagenreihung', '0.12';

requires 'Travel::Status::DE::DBWagenreihung', '== 0.13';

requires 'Travel::Status::DE::HAFAS', '>= 5.06';

requires 'Travel::Status::DE::IRIS';

requires 'XML::LibXML';

lib/DBInfoscreen/Controller/Wagenreihung.pm

+2 −2
Original line number Diff line number Diff line
@@ -72,7 +72,7 @@ sub wagenreihung { 
				e  => $exit_side ? substr( $exit_side, 0, 1 ) : '',

				tt => $wr->train_type,

				tn => $train,

				s  => $wr->station_name,

				s  => $wr->station->{name},

				p  => $wr->platform

			};
@@ -168,7 +168,7 @@ sub wagenreihung { 
				'wagenreihung',

				description => sprintf(

					'Ist-Wagenreihung %s in %s',

					$title, $wr->station_name

					$title, $wr->station->{name}

				),

				wr_error  => undef,

				title     => $title,

templates/wagenreihung.html.ep

+2 −2
Original line number Diff line number Diff line
@@ -17,7 +17,7 @@ 
  % }

  <div class="container">

    <div style="text-align: center;">

%=    join( ' / ', $wr->origins )

%=    join( ' / ', map { $_->{name} } $wr->origins )

      →

%=    join( ' / ', map { $_->{name} } $wr->destinations )

    </div>
@@ -28,7 +28,7 @@ 
       % }

      </div>

    % }

    <%= $wr->station_name %> Gleis <%= $wr->platform %><br/>

    <%= $wr->station->{name} %> Gleis <%= $wr->platform %><br/>

    % for my $desc ($wr->train_descriptions) {

      % if ($desc->{text}) {

        %= $desc->{text}