X-Git-Url: http://wagnertech.de/gitweb/gitweb.cgi/mfinanz.git/blobdiff_plain/cf63992efd6843a38de948fc509cdcc3bf51f1b6..5384e5cb7568d04e61bb5c712d7953df046f3a2c:/SL/PriceSource/ALL.pm

diff --git a/SL/PriceSource/ALL.pm b/SL/PriceSource/ALL.pm
index 33a7e447d..3d9813ef7 100644
--- a/SL/PriceSource/ALL.pm
+++ b/SL/PriceSource/ALL.pm
@@ -17,6 +17,12 @@ my @price_sources_order = qw(
   makemodel
 );
 
+sub all_enabled_price_sources {
+  my %disabled = map { $_ => 1 } @{ $::instance_conf->get_disabled_price_sources };
+
+  map { $price_sources_by_name{$_} } grep { !$disabled{$_} } @price_sources_order;
+}
+
 sub all_price_sources {
   map { $price_sources_by_name{$_} } @price_sources_order;
 }