View | Details | Raw Unified | Return to bug 7180
Collapse All | Expand All

(-)a/acqui/addorderiso2709.pl (-2 / +1 lines)
Lines 227-233 if ($op eq ""){ Link Here
227
            $price =~ s/\./,/ if C4::Context->preference("CurrencyFormat") eq "FR";
227
            $price =~ s/\./,/ if C4::Context->preference("CurrencyFormat") eq "FR";
228
            $price = $num->unformat_number($price);
228
            $price = $num->unformat_number($price);
229
            $orderinfo{gstrate} = $bookseller->{gstrate};
229
            $orderinfo{gstrate} = $bookseller->{gstrate};
230
            my $c = $c_discount ? $c_discount / 100 : $bookseller->{discount} / 100;
230
            my $c = $c_discount ? $c_discount : $bookseller->{discount} / 100;
231
            if ( $bookseller->{listincgst} ) {
231
            if ( $bookseller->{listincgst} ) {
232
                if ( $c_discount ) {
232
                if ( $c_discount ) {
233
                    $orderinfo{ecost} = $price;
233
                    $orderinfo{ecost} = $price;
234
- 

Return to bug 7180