Revision 7e253668
Von Sven Schöling vor etwa 4 Jahren hinzugefügt
SL/Helper/Inventory.pm | ||
---|---|---|
341 | 341 |
|
342 | 342 |
for my $name (@attributes) { |
343 | 343 |
no strict 'refs'; |
344 |
*{"WH::Allocation::$name"} = sub { $_[0]{$name} };
|
|
344 |
*{"SL::Helper::Inventory::Allocation::$name"} = sub { $_[0]{$name} };
|
|
345 | 345 |
} |
346 | 346 |
|
347 | 347 |
sub new { |
Auch abrufbar als: Unified diff
Inventory Helper: Methoden der Allocation Klasse gefixt