Revision 40c2f024
Von Tamino Steinert vor fast 3 Jahren hinzugefügt
SL/DB/Shipto.pm | ||
---|---|---|
my $module = $type =~ m{::Order$} ? 'OE'
|
||
: $type =~ m{::DeliveryOrder$} ? 'DO'
|
||
: $type =~ m{::Invoice$} ? 'AR'
|
||
: $type =~ m{::Reclamation$} ? 'RC'
|
||
: $type =~ m{::(?:Customer|Vendor)$} ? 'CT'
|
||
: croak "Unsupported target class '$type'";
|
||
|
Auch abrufbar als: Unified diff
Reclamation: Controller and Templates created