summaryrefslogtreecommitdiff
path: root/lib/Travel/Status/DE/DBWagenreihung
diff options
context:
space:
mode:
authorDaniel Friesel <derf@finalrewind.org>2019-12-21 19:47:55 +0100
committerDaniel Friesel <derf@finalrewind.org>2019-12-21 19:47:55 +0100
commita75843f56d6e23cc9a1156dfb09b6fe6d81ff3f6 (patch)
treedbc2c7626a14a6ec3043e4956152e4e8ab8cd0ac /lib/Travel/Status/DE/DBWagenreihung
parent8a8fb37507d9a1922d8412e88441baaac8f0d2e3 (diff)
wagon: +train_no, uic_id
Diffstat (limited to 'lib/Travel/Status/DE/DBWagenreihung')
-rw-r--r--lib/Travel/Status/DE/DBWagenreihung/Wagon.pm4
1 files changed, 3 insertions, 1 deletions
diff --git a/lib/Travel/Status/DE/DBWagenreihung/Wagon.pm b/lib/Travel/Status/DE/DBWagenreihung/Wagon.pm
index 3f14f14..bda654b 100644
--- a/lib/Travel/Status/DE/DBWagenreihung/Wagon.pm
+++ b/lib/Travel/Status/DE/DBWagenreihung/Wagon.pm
@@ -13,7 +13,7 @@ Travel::Status::DE::DBWagenreihung::Wagon->mk_ro_accessors(
qw(attributes class_type has_ac has_accessibility has_bahn_comfort
has_bike_storage has_bistro has_compartments has_family_area
has_phone_area has_quiet_area is_dosto is_interregio is_locomotive
- is_powercar number model multipurpose section type)
+ is_powercar number model multipurpose section train_no type uic_id)
);
our %type_attributes = (
@@ -73,8 +73,10 @@ sub new {
$ref->{has_bistro} = 0;
$ref->{is_locomotive} = 0;
$ref->{is_powercar} = 0;
+ $ref->{train_no} = $opt{train_no};
$ref->{number} = $opt{wagenordnungsnummer};
$ref->{model} = $opt{fahrzeugnummer};
+ $ref->{uic_id} = $opt{fahrzeugnummer};
$ref->{section} = $opt{fahrzeugsektor};
$ref->{type} = $opt{fahrzeugtyp};