% }
% my $linetype = 'bahn';
% if ( $departure->{train_type} eq 'S' ) {
% $linetype = 'sbahn';
% }
% elsif ( $departure->{train_type} eq 'IC'
% or $departure->{train_type} eq 'ICE'
% or $departure->{train_type} eq 'EC' ) {
% $linetype = 'fern';
% }
% if ($departure->{train_type} and $departure->{train_no}) {
%= $departure->{train_type}
% }
% if ($departure->{train_line} ) {
%= $departure->{train_line}
% }
% elsif ($departure->{train_no}) {
<%= $departure->{train_no} %>
% }
% else {
%= $departure->{train}
% }
% if (@{$departure->{replaced_by}} or @{$departure->{replacement_for}}) {
% for my $replacement (@{$departure->{replaced_by}}) {
→ <%= $replacement %>
% }
% for my $replacement (@{$departure->{replacement_for}}) {
↑ <%= $replacement %>
% }
% }
% if ($departure->{info} and length $departure->{info}) {
%= $departure->{info}
% }
% else {
%= $route_str
% }
% }