Revision 8c6efb2a
Von Moritz Bunkus vor mehr als 18 Jahren hinzugefügt
| SL/User.pm | ||
|---|---|---|
| 612 | 612 |
|
| 613 | 613 |
## LINET |
| 614 | 614 |
sub calc_version {
|
| 615 |
$main::lxdebug->enter_sub(); |
|
| 615 |
$main::lxdebug->enter_sub(2);
|
|
| 616 | 616 |
|
| 617 | 617 |
my (@v, $version, $i); |
| 618 | 618 |
|
| ... | ... | |
| 626 | 626 |
$version += $v[$i]; |
| 627 | 627 |
} |
| 628 | 628 |
|
| 629 |
$main::lxdebug->leave_sub(); |
|
| 629 |
$main::lxdebug->leave_sub(2);
|
|
| 630 | 630 |
return $version; |
| 631 | 631 |
} |
| 632 | 632 |
|
| ... | ... | |
| 733 | 733 |
last if ($version < $mindb); |
| 734 | 734 |
|
| 735 | 735 |
# apply upgrade |
| 736 |
$main::lxdebug->message(DEBUG2, "Appliying Update $upgradescript"); |
|
| 736 | 737 |
$self->process_query($form, $dbh, "sql/" . $form->{"dbdriver"} . "-upgrade/$upgradescript", $str_maxdb);
|
| 737 | 738 |
|
| 738 | 739 |
$version = $maxdb; |
Auch abrufbar als: Unified diff
Trace Levels Hack. Wenn es koennen jetzt in den lxdebug->enter_sub und leave_sub Aufrufen Tracelevels uebergeben werden. Ist das global_trace_subs geringer, werden diese in den Traceausgaben ignoriert. Standardmaessig ist das jetzt bei Menu::access_control und Form::unescape der Fall.
Um (derzeit) alle Traceausgaben zu bekommen in der lx-erp.conf $global_trabce_subs = 2; setzen.
Debugausgaben entfernt.
parse_amount, format_amount und round_amount auf tracelevel 2 gesetzt. Trace breaker in parse_amount gefixt.
[Merge der Revisionen 943:945 957 aus dem LINET prog Repo]