X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/89b2668811eac6023ad58322e2f9970ddb6a27c9..c0713b66e59e458d4966b8954ec1c835e2bc0c5b:/SL/PriceSource/Vendor.pm diff --git a/SL/PriceSource/Vendor.pm b/SL/PriceSource/Vendor.pm index 94d9bd01f..0b09ad698 100644 --- a/SL/PriceSource/Vendor.pm +++ b/SL/PriceSource/Vendor.pm @@ -4,7 +4,7 @@ use strict; use parent qw(SL::PriceSource::Base); use SL::DB::Vendor; -use SL::PriceSource::Price; +use SL::PriceSource::Discount; use SL::Locale::String; sub name { 'vendor_discount' } @@ -20,7 +20,7 @@ sub available_discounts { return unless $self->record->vendor; return unless $self->record->vendor->discount != 0; - SL::PriceSource::Vendor->new( + SL::PriceSource::Discount->new( discount => $self->record->vendor->discount, spec => $self->record->vendor->id, description => t8('Vendor Discount'),