Revision 1f592a0f
Von Moritz Bunkus vor mehr als 10 Jahren hinzugefügt
| SL/DB/RequirementSpecItem.pm | ||
|---|---|---|
| 37 | 37 |
return [ sort { $a->position <=> $b->position } @{ $self->children } ];
|
| 38 | 38 |
} |
| 39 | 39 |
|
| 40 |
sub get_section {
|
|
| 41 |
my ($self) = @_; |
|
| 42 |
|
|
| 43 |
$self = $self->parent while $self->parent_id; |
|
| 44 |
|
|
| 45 |
return $self; |
|
| 46 |
} |
|
| 47 |
|
|
| 48 |
sub get_type {
|
|
| 49 |
my ($self) = @_; |
|
| 50 |
|
|
| 51 |
return 'section' if !$self->parent_id; |
|
| 52 |
return $self->parent->parent_id ? 'sub-function-block' : 'function-block'; |
|
| 53 |
} |
|
| 54 |
|
|
| 40 | 55 |
1; |
Auch abrufbar als: Unified diff
Pflichtenhefte: Auflisten von Abschnitten