Revision bf7f935d
Von Sven Schöling vor mehr als 9 Jahren hinzugefügt
| SL/Menu.pm | ||
|---|---|---|
|
# first, some sanity check. are all parents valid ids or empty?
|
||
|
for my $node ($self->nodes) {
|
||
|
next if !exists $node->{parent} || !$node->{parent} || $self->{by_id}->{$node->{id}};
|
||
|
die "menu: node $node->{id} has non-existant parent $node->{parent}";
|
||
|
die "menu: node $node->{id} has non-existent parent $node->{parent}";
|
||
|
}
|
||
|
|
||
|
my %by_parent;
|
||
Auch abrufbar als: Unified diff
Menu: Rechtschreibung