From 9f529d9fc2f344203eef9c567a15ae046fe9c5d6 Mon Sep 17 00:00:00 2001
From: Daniel Friesel <derf@finalrewind.org>
Date: Sat, 19 Dec 2020 17:33:39 +0100
Subject: improve attributoun on wagon order views

---
 lib/DBInfoscreen/Controller/Wagenreihung.pm | 9 ++++++---
 1 file changed, 6 insertions(+), 3 deletions(-)

(limited to 'lib')

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],
-- 
cgit v1.2.3