]> wagnertech.de Git - mfinanz.git/blobdiff - SL/PriceSource/Customer.pm
epic-ts
[mfinanz.git] / SL / PriceSource / Customer.pm
index 52d35ee926c49064aa5f4a02964d6e66b05aece5..c0cfbc09a86b083373545412b40c0a5f238bd7b1 100644 (file)
@@ -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);