diff options
author | Daniel Friesel <derf@finalrewind.org> | 2020-12-19 17:33:39 +0100 |
---|---|---|
committer | Daniel Friesel <derf@finalrewind.org> | 2020-12-19 17:33:39 +0100 |
commit | 9f529d9fc2f344203eef9c567a15ae046fe9c5d6 (patch) | |
tree | 83f828111a2b13dd528257ea972189ef123724e0 /lib | |
parent | 240e442e559096958a4fb29740e6ffeb1d31af78 (diff) |
improve attributoun on wagon order views
Diffstat (limited to 'lib')
-rw-r--r-- | lib/DBInfoscreen/Controller/Wagenreihung.pm | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/lib/DBInfoscreen/Controller/Wagenreihung.pm b/lib/DBInfoscreen/Controller/Wagenreihung.pm index 498b3b6..63366a2 100644 --- a/lib/DBInfoscreen/Controller/Wagenreihung.pm +++ b/lib/DBInfoscreen/Controller/Wagenreihung.pm @@ -49,14 +49,17 @@ sub zugbildung_db { my $pos = 0; for my $wagon (@wagons) { $wagon->{position}{start_percent} = $pos; - $wagon->{position}{end_percent} = $pos + 4; - $pos += 4; + $wagon->{position}{end_percent} = $pos + 5; + $pos += 5; } + my $train_type = $details->{raw}; + $train_type =~ s{ - .* }{}x; + $self->render( 'zugbildung_db', wr_error => undef, - title => $details->{raw} . ' ' . $train_no, + title => $train_type . ' ' . $train_no, zb => $details, train_no => $train_no, wagons => [@wagons], |