X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/c26b6eab2c0851f03faa58ea30c81dee706e329b..deb4d2dbb676d7d6f69dfe7815d6e0cb09bd4a44:/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);