X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/cc6d0e60e203d7b7fab1e95908cbe4afca5e18a0..e8889e47af38072dc6fcbb4d97e2fdcc30d948d7:/SL/PriceSource/Customer.pm diff --git a/SL/PriceSource/Customer.pm b/SL/PriceSource/Customer.pm index 52d35ee92..c0cfbc09a 100644 --- a/SL/PriceSource/Customer.pm +++ b/SL/PriceSource/Customer.pm @@ -29,7 +29,9 @@ sub available_discounts { ); } -sub price_from_source { +sub price_from_source { } + +sub discount_from_source { my ($self, $source, $spec) = @_; my $customer = SL::DB::Customer->load_cached($spec);