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

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

Return to bug 7180