Revision 1095df47
Von Tamino Steinert vor 5 Tagen hinzugefügt
| SL/DB/Part.pm | ||
|---|---|---|
| 212 | 212 |
sub is_assembly { $_[0]->part_type eq 'assembly' }
|
| 213 | 213 |
sub is_service { $_[0]->part_type eq 'service' }
|
| 214 | 214 |
sub is_assortment { $_[0]->part_type eq 'assortment' }
|
| 215 |
sub is_parent_varient { $_[0]->part_type eq 'parent_variant' }
|
|
| 216 |
sub is_varient { $_[0]->part_type eq 'variant' }
|
|
| 215 |
sub is_parent_variant { $_[0]->part_type eq 'parent_variant' }
|
|
| 216 |
sub is_variant { $_[0]->part_type eq 'variant' }
|
|
| 217 | 217 |
|
| 218 | 218 |
sub type { return $_[0]->part_type; }
|
| 219 | 219 |
|
Auch abrufbar als: Unified diff
FIX: spelling