X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/5384e5cb7568d04e61bb5c712d7953df046f3a2c..refs/heads/mebil-0.1:/SL/PriceSource/ALL.pm diff --git a/SL/PriceSource/ALL.pm b/SL/PriceSource/ALL.pm index 3d9813ef7..09f772d87 100644 --- a/SL/PriceSource/ALL.pm +++ b/SL/PriceSource/ALL.pm @@ -4,21 +4,33 @@ use strict; use SL::PriceSource::Pricegroup; use SL::PriceSource::MasterData; use SL::PriceSource::Makemodel; +use SL::PriceSource::Customer; +use SL::PriceSource::Vendor; +use SL::PriceSource::Business; +use SL::PriceSource::PriceRules; my %price_sources_by_name = ( master_data => 'SL::PriceSource::MasterData', + customer => 'SL::PriceSource::Customer', + vendor => 'SL::PriceSource::Vendor', pricegroup => 'SL::PriceSource::Pricegroup', makemodel => 'SL::PriceSource::Makemodel', + business => 'SL::PriceSource::Business', + price_rules => 'SL::PriceSource::PriceRules', ); my @price_sources_order = qw( master_data + customer + vendor pricegroup makemodel + business + price_rules ); sub all_enabled_price_sources { - my %disabled = map { $_ => 1 } @{ $::instance_conf->get_disabled_price_sources }; + my %disabled = map { $_ => 1 } @{ $::instance_conf->get_disabled_price_sources || [] }; map { $price_sources_by_name{$_} } grep { !$disabled{$_} } @price_sources_order; }