1 package SL::PriceSource::ALL;
4 use SL::PriceSource::Pricegroup;
5 use SL::PriceSource::MasterData;
6 use SL::PriceSource::Makemodel;
8 my %price_sources_by_name = (
9 master_data => 'SL::PriceSource::MasterData',
10 pricegroup => 'SL::PriceSource::Pricegroup',
11 makemodel => 'SL::PriceSource::Makemodel',
14 my @price_sources_order = qw(
20 sub all_price_sources {
21 map { $price_sources_by_name{$_} } @price_sources_order;
24 sub price_source_class_by_name {
25 $price_sources_by_name{$_[1]};