Revision 40782548
Von Moritz Bunkus vor mehr als 17 Jahren hinzugefügt
| bin/mozilla/pe.pl | ||
|---|---|---|
| 50 | 50 |
"$form->{script}?action=add&type=$form->{type}&path=$form->{path}&login=$form->{login}&password=$form->{password}"
|
| 51 | 51 |
unless $form->{callback};
|
| 52 | 52 |
|
| 53 |
&{"form_$form->{type}_header"};
|
|
| 54 |
&{"form_$form->{type}_footer"};
|
|
| 53 |
call_sub("form_$form->{type}_header");
|
|
| 54 |
call_sub("form_$form->{type}_footer");
|
|
| 55 | 55 |
|
| 56 | 56 |
$lxdebug->leave_sub(); |
| 57 | 57 |
} |
| ... | ... | |
| 72 | 72 |
if ($form->{type} eq 'pricegroup') {
|
| 73 | 73 |
PE->get_pricegroup(\%myconfig, \%$form); |
| 74 | 74 |
} |
| 75 |
&{"form_$form->{type}_header"};
|
|
| 76 |
&{"form_$form->{type}_footer"};
|
|
| 75 |
call_sub("form_$form->{type}_header");
|
|
| 76 |
call_sub("form_$form->{type}_footer");
|
|
| 77 | 77 |
|
| 78 | 78 |
$lxdebug->leave_sub(); |
| 79 | 79 |
} |
| ... | ... | |
| 498 | 498 |
$lxdebug->leave_sub(); |
| 499 | 499 |
} |
| 500 | 500 |
|
| 501 |
sub continue { &{ $form->{nextsub} } }
|
|
| 501 |
sub continue { call_sub($form->{"nextsub"}); }
|
|
| 502 | 502 |
|
| 503 | 503 |
sub partsgroup_report {
|
| 504 | 504 |
$lxdebug->enter_sub(); |
Auch abrufbar als: Unified diff
Eine Funktion zum "sicheren" Aufrufen von Unterfunktionen eingebaut, damit &{ $form->{nextsub} }(); nicht ungeprüft aufgerufen werden muss.