Revision ee9fb352
Von Thomas Kasulke vor mehr als 17 Jahren hinzugefügt
| SL/Form.pm | ||
|---|---|---|
| 1596 | 1596 |
$key = "all_currencies" unless ($key); |
| 1597 | 1597 |
|
| 1598 | 1598 |
my $query = qq|SELECT curr AS currency FROM defaults|; |
| 1599 |
|
|
| 1600 |
$self->{$key} = selectall_hashref_query($self, $dbh, $query);
|
|
| 1599 |
|
|
| 1600 |
$self->{$key} = [split(/\:/ , selectfirst_hashref_query($self, $dbh, $query)->{currency})];
|
|
| 1601 | 1601 |
|
| 1602 | 1602 |
$main::lxdebug->leave_sub(); |
| 1603 | 1603 |
} |
Auch abrufbar als: Unified diff
sub _get_currencies an currencies angepasst, da diese mit : getrennt in der Tabelle stehen