Revision 2879330b
Von Bernd Blessmann vor fast 13 Jahren hinzugefügt
| bin/mozilla/ir.pl | ||
|---|---|---|
| 116 | 116 |
} |
| 117 | 117 |
} |
| 118 | 118 |
|
| 119 |
my ($payment_id, $language_id, $taxzone_id); |
|
| 119 |
my ($payment_id, $language_id, $taxzone_id, $currency);
|
|
| 120 | 120 |
if ($form->{payment_id}) {
|
| 121 | 121 |
$payment_id = $form->{payment_id};
|
| 122 | 122 |
} |
| ... | ... | |
| 126 | 126 |
if ($form->{taxzone_id}) {
|
| 127 | 127 |
$taxzone_id = $form->{taxzone_id};
|
| 128 | 128 |
} |
| 129 |
if ($form->{currency}) {
|
|
| 130 |
$currency = $form->{currency};
|
|
| 131 |
} |
|
| 129 | 132 |
|
| 130 | 133 |
my $cp_id = $form->{cp_id};
|
| 131 | 134 |
IR->get_vendor(\%myconfig, \%$form); |
| ... | ... | |
| 141 | 144 |
if ($taxzone_id) {
|
| 142 | 145 |
$form->{taxzone_id} = $taxzone_id;
|
| 143 | 146 |
} |
| 147 |
if ($currency) {
|
|
| 148 |
$form->{currency} = $currency;
|
|
| 149 |
} |
|
| 144 | 150 |
|
| 145 | 151 |
my @curr = split(/:/, $form->{currencies}); #seems to be missing
|
| 146 | 152 |
map { $form->{selectcurrency} .= "<option>$_\n" } @curr;
|
Auch abrufbar als: Unified diff
Fix für Bug 1770 - Währung / currency überlebt Workflow über Lieferschein nicht