PriceSource: Mehr Informationen an Preise übergeben

[mfinanz.git] / SL / PriceSource.pm

diff --git a/SL/PriceSource.pm b/SL/PriceSource.pm
index 9a3a978c5ce1debd1292318bdf71feefe9d751e8..7a631bab47e9c1f06681848609ed49eff8c9d549 100644 (file)
--- a/SL/PriceSource.pm
+++ b/SL/PriceSource.pm
@@ -3,7 +3,7 @@ package SL::PriceSource;
 use strict;
 use parent 'SL::DB::Object';
 use Rose::Object::MakeMethods::Generic (
-  scalar => [ qw(record_item) ],
+  scalar => [ qw(record_item record) ],
 );
 
 use List::UtilsBy qw(min_by);
@@ -15,7 +15,7 @@ sub all_price_sources {
   my ($self) = @_;
 
   return map {
-    $_->new(record_item => $self->record_item)
+    $_->new(record_item => $self->record_item, record => $self->record)
   } SL::PriceSource::ALL->all_price_sources
 }