diff options
Diffstat (limited to 'lib/Travelynx.pm')
| -rwxr-xr-x | lib/Travelynx.pm | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/lib/Travelynx.pm b/lib/Travelynx.pm index 1b81f88..c594e96 100755 --- a/lib/Travelynx.pm +++ b/lib/Travelynx.pm @@ -1178,6 +1178,12 @@ sub startup { wagons => [@wagons], } ); + if ( $group->{fahrzeuggruppebezeichnung} + and $group->{fahrzeuggruppebezeichnung} eq + 'ICE0304' ) + { + $data->{wagonorder_pride} = 1; + } } $self->in_transit->update_data( uid => $uid, |