summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--index.pl10
1 files changed, 10 insertions, 0 deletions
diff --git a/index.pl b/index.pl
index f779291..652ea60 100644
--- a/index.pl
+++ b/index.pl
@@ -250,6 +250,16 @@ sub handle_request {
$result->delay, $delaymsg ? q{: } : q{}, $delaymsg );
}
}
+ if ( $result->replacement_for and $template ne 'clean') {
+ for my $rep ($result->replacement_for) {
+ $info = sprintf('Ersatzzug für %s %s %s%s',
+ $rep->type,
+ $rep->train_no,
+ $info ? '+++ ' : q{},
+ $info // q{}
+ );
+ }
+ }
if ( $info and $qosmsg ) {
$info .= ' +++ ';
}