Revision 377ff409
Von Moritz Bunkus vor fast 18 Jahren hinzugefügt
| SL/Form.pm | ||
|---|---|---|
| 653 | 653 |
} |
| 654 | 654 |
my $neg = ($amount =~ s/-//); |
| 655 | 655 |
|
| 656 |
if (defined($places)) {
|
|
| 656 |
if (defined($places) && ($places ne '')) {
|
|
| 657 | 657 |
if ($places < 0) {
|
| 658 | 658 |
$amount *= 1; |
| 659 | 659 |
$places *= -1; |
Auch abrufbar als: Unified diff
Leeren String auch als "nicht gesetzt" deuten.