X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/eebe8e90991eacadb6fbd20a648c152017a620c7..0409db7c50da81e1eb613bd33663fb5b07935a01:/SL/PriceSource.pm?ds=inline diff --git a/SL/PriceSource.pm b/SL/PriceSource.pm index 9a3a978c5..7a631bab4 100644 --- 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 }