Revision 2c7a89dd
Von Sven Schöling vor mehr als 15 Jahren hinzugefügt
| SL/DBUpgrade2.pm | ||
|---|---|---|
|
}
|
||
|
|
||
|
sub _dbupdate2_calculate_depth {
|
||
|
$main::lxdebug->enter_sub();
|
||
|
$main::lxdebug->enter_sub(2);
|
||
|
|
||
|
my ($tree, $tag) = @_;
|
||
|
|
||
|
my $node = $tree->{$tag};
|
||
|
|
||
|
return $main::lxdebug->leave_sub() if (defined($node->{"depth"}));
|
||
|
return $main::lxdebug->leave_sub(2) if (defined($node->{"depth"}));
|
||
|
|
||
|
my $max_depth = 0;
|
||
|
|
||
| ... | ... | |
|
|
||
|
$node->{"depth"} = $max_depth + 1;
|
||
|
|
||
|
$main::lxdebug->leave_sub();
|
||
|
$main::lxdebug->leave_sub(2);
|
||
|
}
|
||
|
|
||
|
sub sort_dbupdate_controls {
|
||
Auch abrufbar als: Unified diff
DBUpgrade such routine im trace runtergesetzt.