Revision b95c5658
Von Moritz Bunkus vor mehr als 13 Jahren hinzugefügt
bin/mozilla/is.pl | ||
---|---|---|
473 | 473 |
|
474 | 474 |
$main::auth->assert('invoice_edit'); |
475 | 475 |
|
476 |
my ($recursive_call) = shift;
|
|
476 |
my ($recursive_call) = @_;
|
|
477 | 477 |
|
478 | 478 |
$form->{exchangerate} = $form->parse_amount(\%myconfig, $form->{exchangerate}) unless $recursive_call; |
479 | 479 |
|
Auch abrufbar als: Unified diff
Konstruktue "my ($foo) = shift" durch eindeutigere Konstrukte ersetzt